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The  Anadex  80  Column  Printer. 


First  check 
the  specs. 
Then  check 
the  price. 

Our  new  80-column  dot 
matrix  line  printer  -  the 
DP-8000  -  combines  high 
performance  and  operating 
convenience  with  a  low  price 
that’s  worth  checking  into. 

fPI^Check  Performance 

The  DP-8000  features  a 
precision  engineered,  heavy 
duty  printing  mechanism  that 
can  print  the  complete 
96  ASCII  character  set,  bi¬ 
directionally,  at  84  LPM. 

H^Check  the  Interface 

Included  at  no  extra  cost, 
are  two  input  connectors  (see 
photo)  that  provide  three  basic 
ASCII  compatible  interfaces: 

El  A  Std. 

RS232C,  for 
interfacing  at 
up  to  9600 
Baud  with 
most  mini¬ 
computers 
and  modems; 
the  20/60  ma 
current  drive 
mode  re¬ 
quired  by  Teletype®  ASR33-35 
printers;  and  the  parallel-bit, 
serial  character  synchronous 
Centronics  compatible  interface. 


The  DP-8000  includes  12 
lines  of  internal  FIFO  buffer 
storage  and  can  accept  data 
continuously  or  in  bursts. 
Optionally,  increased  buffer 
storage  of  2048  characters 
can  be  supplied  for  CRT  dump 
and  similar  applications. 

^ Check  Printer  Quality 

A  9  x  7  character  font 
provides  virtually  half-dot 
resolution  for  clean  crisp  print 
quality  on  the  original  plus 
three  copies. 

Precise  paper 
positioning  is  ensured 
by  a  sprocket-feed 
paper  advance,  user- 
programmable  Top 
of  Form  control,  and 
up  to  8  vertical 
tab  positions. 

\Sf Check 

Convenience 

For  operating  ease,  the 
DP-8000  accepts  paper  through 
the  rear  or  bottom  of  the  unit, 
provides  programmable  Skip 


Over  Perforation  control,  and 
Out  of  Paper  indication  and 
logic  signal.  And  movable 
sprockets  allow  the  use  of  forms 
or  paper  from  under  3  inches  to 
9'/2  inches  wide. 

fR^Check  the  low  Price 

The  best  news  is  the  price. 
A  complete  DP-8000  is  unit- 
priced  at  under  $1000,  with 
substantial  discounts  in  larger 
quantities. 

Once  you’ve  checked  out 
the  performance  and  price, 
we  think  you’ll  agree  that  the 
DP-8000  is  definitely  worth 
checking  into.  Contact  us  today 
for  complete  details  and  a 
demonstration. 


ANADEX,  INC.  •  9825  DeSoto  Avenue  •  Chatsworth,  CA  91311.  U.S.A,  •  Tel:  213/998-8010  •  TWX  910-494-2761 

ANADEX,  LTD.  •  Dorna  House.  Guildford  Road  •  West  End.  Woking.  Surrey  GU24  9PW,  England  •  Tel:  Chobham  (09905)  6333  •  Telex:  858762  ANADEX  G 
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When  the  people 
behind  the  products  count! 


(Formerly  the  CPG  Shop) 


ComputerCity  Sampler 
Disk  Drives 

When  you’re  ready  to  add  disk  storage  to  your  TRS-80*,  we’re  here  to  help. 
Our  CCI-100™  and  -200™  drives  offer  more  capacity  than  Radio  Shack  35-Track  (85K  Bytes)  drives.  These  drives 
are  fully  assembled,  tested  and  ready  to  plug-in  the  moment  you  receive  them.  They  can  be  intermixed  with  each 
other  and  Radio  Shack  drives  on  the  same  cable.  90  day  warranty. 

CCI-100™  40  Track  (102K  Bytes)  $399.00  CCI-200™  77  Track  (197K  Bytes)  $675.00 


As  the  CPG  Shop,  we  have  been  dedicated  to  meet¬ 
ing  the  needs  of  the  microcomputer  user.  The  suc¬ 
cess  of  the  CPG  Shop  has  led  to  ComputerCity— 
the  merging  of  our  manufacturing,  wholesale  and 
mail  order  divisions  with  our  rapidly  expanding  re¬ 
tail  outlets  to  provide  the  increased  products  and 
services  the  microcomputer  consumers  of  today 
and  tomorrow  want— and  need.  We  remain  dedi¬ 
cated  to  providing  the  same  service,  technical  assis¬ 
tance  and  fair  pricing  you’ve  come  to  expect  from 
the  CPG  Shop. 

David  C.  Lourie,  President 


h*S 


Printers 

Letter  Quality  High  Speed  Printer 

NEC  Spinwriter:  In¬ 
cludes  TRS-80*  inter¬ 
face  software,  quick 
change  print  fonts,  55 
GPS,  bidirectional, 
high  resolution  plot¬ 
ting,  graphing,  pro¬ 
portional  spacing  and 


tractor  feed  assembly.  90  day  warranty  $2979.00 
Also:  Centronics,  Paper  Tiger,  HI  Plot  Digital  Plotter 
16K  Memory  (Jp-grade  Kits 
Fast  and  ultrareliable  $99.00 

DISK  OPERATING  SYSTEMS 
NEWDOS  by  Apparat*  $49.95 

NEWDOS  “PLUS”  by  Apparat+  $99.95 

DOS  3.0  by  the  original  author  of  2.1  $49.95 


DISKETTE  TRS-80* 

BUSINESS  SOFTWARE  BY  SBSG 

Free  enhancements  and  upgrades  to  registered 
owners  for  the  cost  of  media  and  mailing.  30  day  free 
telephone  support.  User  reference  on  request 
Fully  Interactive  Accounting  Package:  General  Ledger, 
Accounts  Payable,  Accounts  Receivable  and  Payroll. 
Report  generating. 

Complete  Package  (requires  3  or  4  drives)  $475.00 
Individual  Modules  (requires  2  or  3  drives)  $125.00 


Inventory  II:  (requires  2  or  3  drives)  $  99.00 

Mailing  List  Name  &  Address  11 
(requires  2  drives)  $  1 29.00 

Intelligent  Terminal  System  ST-80  III:  $  1 50.00 

The  Electric  Pencil  from  Michael  Shrayer  $  1 50.00 

File  Management  System:  $  49.00 

Budget  Control  Program  II  by  CSA  $  49.95 

Cash  Register  System  II  by  CSA  $  99.00 


ComputerCity  " 

A  division  of  CPG  Industries,  Inc. 

l  175  Main  Street,  Dept.  K-l  Charlestown,  AAA  02129  i 


Hours:  10AM  -  6PM  (EST)  Monday  -  Saturday 
For  detailed  information,  call  617/242-3350 
Massachusetts  residents  add  5%  Sales  Tax 

rw CCI-100  and  -200  are  ComputerCity  Inc.  trademarks 


TO  ORDER  CALL  TOLL  FREE  1-800-343-6522 

Massachusetts  residents  call  617/242-3350 
Retail  Store  Locations: 


175  Main  Street  Charlestown,  MA 
K  Mart  Plaza,  Manchester,  NH 
50  Worcester  Road(Rt.9),  Framingham,  MA 
165  Angell  Street,  Providence,  R1 

Visa  and  Master  Charge  accepted 


*  Tandy  Corporation  Trademark  +  Requires  Radio  Shack  TRSDOS* 


Franchise  and  dealer  inquiries  invited 
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Sometimes  the  true  value  of  a  product  fails  to  relate  to 
its  selling  price.  Van  Gogh's  paintings  once  sold  for  less 
than  $1,000.  Base  2's  MODEL  800  printer  sells  for  lots 
less  than  $1,000,  but  it  does  more  than  printers  costing 
twice  its  price  (and  a  lot  more  than  a  Van  Gogh 
painting). 

Besides  being  beautiful  to  look  at,  the  MODEL  800 
prints  up  to  six  different  character  fonts  with  embedded 
elongation  in  any  of  five  line  densities  (72,  80,  96,  120 
and  132  characters  per  line),  prints  up  to  three  copies 
and  is  equipped  with  a  long-life  cartridge  ribbon.  With 
such  versatility  as  four  interface  modes  (IEEE  488,  in¬ 
dustry  standard  parallel,  20ma  current  loop  and  RS232), 
baud  rates  up  to  19,200,  and  with  accommodations  for 
1 15VAC  or  230VAC  operation,  the  MODEL  800  matches 
any  system  decor. 


As  a  note  of  further  new  world  refinement,  the  MODEL 
800  can  be  optionally  equipped  with  high  speed  paper 
advance  and  graphics  output,  a  versatile  tractor  feed 
mechanism,  terminal  buffer  memory,  tabs  and  form  feed. 

Requiring  only  a  square  foot  of  space,  the  MODEL  800 
is  smaller  than  its  contemporaries;  its  rugged  aluminum 
construction  is  designed  to  stand  the  test  of  time. 

Isn't  it  time  you  added  a  new  masterpiece  to  your 
collection? 

Recommended  retail  price: 


bare_  inc. 


P.O. 
2? - 


Standard  MODEL  800 

$499 

High-speed  paper  advance 

50 

Tractor  mechanism 

50 

Terminal  buffer  memory 

50 
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Simple  Software  Sound  Effects . 34 

Produce  a  variety  of  sound  effects  on  your  TRS-80  with  this  short  program. 
by  J.  Zdunek 

TV  Typist . 42 

Write  and  edit  your  letters  or  other  text  on  your  CRT.  by  Patrick  Seslar 

This  Johnny  Can  Run  the  Computer . 44 

Use  your  computer  as  an  effective  aid  in  teaching  children  to  read,  alphabetize  and 
syllabify,  by  Elizabeth  A.  Whalen 

How  to  Build  a  Program . 48 

This  step-by-step  method  can  help  beginners  write  their  own  programs. 
by  L.  Mitchell  Wein 

Measures  for  Measures . 61 

Home  tape  recordists  can  use  this  program  to  figure  out  the  length  of  tape  needed  to 
record  an  album  and  how  to  re-arrange  selections  to  fit  a  tape,  by  Rod  Morgan 

A  Wine  Tasting  Party . 64 


Your  computer  can  act  as  host  at  a  wine  tasting  party  by  keeping  track  of  your 
guests’  responses  to  the  wines,  by  Robert  C.  Kyle 

DIGGING  IN 


Assorted  Sorts . 29 

Here's  a  look  at  the  most  popular  sorting  routines,  essential  for  many  applications. 
by  David  Galef 

Merging  on  the  Pet . 40 

Use  this  program  to  merge  two  programs,  merge  a  program  and  a  subroutine,  or 
combine  parts  of  two  programs,  by  David  Mulder 

TRS-80  Line  Renumbering . 51 

The  annoying  problem  of  running  out  of  line  numbers  is  solved  with  this  TRS-80 
program,  by  Blake  Ward 

Stonehenge . 55 

Duplicate  the  ancient  and  mysterious  Stonehenge  structure  to  see  how  our 
ancestors  calculated  seasons  and  eclipses,  by  Bonnie  J.  and  David  J .  Beard 

Off  to  the  Races . 70 

Get  an  edge  on  the  horses  for  your  next  trip  to  the  race  track,  by  Rinaldo  F.  Frisco 


IN  THE  MONEY 

Forecasting . 22 

Small  businesses  can  use  this  handy  program  to  get  a  glimpse  of  the  future. 
by  R.  Tickell 


DEPARTMENTS 


FEEDBACK . 6 

RANDOM  ACCESS . 9 

FUTURE  COMPUTING ....  16 

COMPUTER  CHESS . 75 

COMPUTER  GAMES . 83 

COMPUTER  BRIDGE . 87 

BOOKSHELF . 90 

PRODUCT  CLOSE-UP . 92 

WHAT’S  COMING  UP . 96 

AD  INDEX . 112 


Linear  Regressions  for  Small  Businesses . 25 

This  linear  regression  routine  can  help  businesses  save  money  in  a  number  of 
applications,  by  Mike  De  Santis 

Calculator  Accounting:  Part  2 . 38 

Learn  how  to  use  your  calculator  for  accounting  procedures  in  a  small  business. 
by  Marlin  Snow 

Battling  The  Gas  Pump  Blues . 68 

Calculate  your  driving  costs  with  this  program,  by  Fred  E.  Guth 
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Introducing... 

MINI-FLEX 

Designed  Specifically 
to  Protect  5"  Diskettes 


Mask 


Member  of  The 
Advance  Access 
Diskette 

Protection  Family 


ADVANCE  ACCESS  GROUP 

10526  W,  Cermak  Westchester,  IL  60153  312  562-5210 
“Manufacturers  of  Information  Processing  Supplies” 


For  Further  Information 

CALL  TOLL  FREE 
800  323-0254 
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TRS-80/NORTH  STAR 

SOFTWARE 

By  J.  Roehrig  as  seen  in  Byte,  Kilobaud  and 
Personal  Computing  Magazines 


1 .  Chess  —  written  in  Basic.  Beats  Microchess. 

2.  Scrabble  —  makes  your  computer  a  Scrabble 
opponent. 

3.  Baseball  —  based  on  Major  League  results,  keeps 
all  statistics.  Players  perform  true  to  life.  Seen  in 
July  1978  Personal  Computing  and  November 
1979  Byte. 

4.  Bowling  Secretary  —  keeps  all  necessary  statis¬ 
tics.  Seen  in  June  1978  Kilobaud. 

5.  Taxes  —  all  new  tax  rates.  Long  form,  short  form, 
Schedules  A,  B,  C  and  Income  Averaging.  Seen  in 
March  1978  Personal  Computing. 

6.  Accounting  —  double  entry  system  produces 
Journal  Entry  Log,  Balance  Sheet  and  Income 
Statement. 


7.  Basketball  —  just  like  Baseball.  Cover  article  from 
January  1979  Personal  Computing. 

8.  Horse  Racing  —  improved  version  of  December 
and  January  1980  Byte  article.  Graphics,  horses 
run  true  to  form,  past  performances  maintained. 
Realistic  win,  place  and  show  payoffs. 

9.  T rotters  —  same  as  above  but  for  T rotters. 

10.  Handicapper  —  a  systematic  way  to  evaluate 
wagers  at  the  T rack  or  OTB. 

11.  Games  —  3D  TIC  TAC  TOE  as  in  April  1978 
Kilobaud,  Boxing  as  in  January  1978  Personal 
Computing  and  Football  as  in  February  1978 
Personal  Computing. 

12.  Backgammon  —  a  challenging  opponent  who 
uses  the  doubling  cube.  Very  graphic. 


NEW  NEW  NEW — TRS-80  Graphic  Skill  Games  for  2  players  or  1  against  the  computer: 

13.  Baseball  14.  Boxing  15.  Football  16.  Golf  17.  Bowling  18.  Horse  Racing 

All  programs  have  been  improved;  each  has  its  own  instruction  booklet  and 
sells  for:  Cassettes  $7, 6  for  $40, 1 2  for  $75, 1 8  for  $1 05 
Diskettes  $10, 6  for  $55, 12  for  $100, 18  for  $140 

SEND  ORDERS  TO: 

JJR  DATA  RESEARCH 
Box  74  Middle  Village,  NY  11379 

or  CALL  C.O.D.’s  TO:  (51 6)  643-1 931  (C.O.D.’s  shipped  within  48  hours) 

in  ■  / 
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The  LIBRARY  100  from  TBS  is  without  doubt  the  greatest  software 
bargain  ever.  Released  in  November  1978,  it  has  sold  thousands  in 
44  countries.  Written  for  the  TRS-80,  LIBRARY  100  contains  100 
programs  on  five  tapes.  Most  of  the  programs  can  be  run  on  a  4K, 
Level  II  computer.  Designed  to  be  a  basic  computer  library,  it  provides 
a  series  of  programs  over  a  broad  range  of  topics.  All  programs  but 
one  are  written  in  BASIC  and  can  easily  be  modified  to  suit  your 
own  purposes. 

“The  program  mix  is  eclectric,  interesting,  and  curious ...  If  I  had  a 
Level  II  TRS-80  and  one  or  more  grade-school  children,  or  if  I  were  a 
hardcore  software  collector,  or  if  I  had  little  software  and  wanted  to 
get  a  lot  of  it  with  a  minimum  of  bother,  I’d  buy  the  Library  100.” 
Stephen  Gray,  Creative  Computing,  April,  1979. 

"...  a  basic  computer  library  for  the  hobbyist,  parent  or  business¬ 
man.”  Kilobaud  Microcomputing,  December  1978. 

The  programs  are  spread  over  five  general  categories;  Finance, 
Education,  Graphics,  Home  and  Games.  As  an  added  bonus,  the 
LIBRARY  100  contains  Tiny  PILOT,  a  condensed  version  of  the  high 
level  language  primarily  used  in  education.  It  is  perfect  for  teachers, 
parents,  students  and  sales  trainees.  Using  only  six  commands,  even 
a  child  could  be  programming  in  minutes.  The  other  programs  are 
as  follows: 

FINANCE:  Present  Value  of  Future  Sum,  Simple  Interest  for  Days, 
Future  Value  of  Present  Sum,  Amortization  Schedule,  Interest  Rate- 
Compound  Interest,  Interest  Rate-Installment  Loan,  Days  Between 
Dates,  Term  of  Installment  Loan,  Present  Value  of  Series  of  Payments, 
Real  Estate  Investment  Analysis,  Nominal-Effective  Interest,  Internal 
Rate  of  Return,  Future  Value,  of  Regular  Deposits,  Regular  Deposits 
for  Future  Value,  Depreciation  (Amount,  Rate,  Salvage  Value, 
Schedule),  Jond-Present  Vafue^M^ld  to  Maturity,  Sale- 
n-Day  of  Week,  M 

JCATION:  Multiplication  &  Division, (Addition,  Subtraction 
Fraction  &  Decimal,  States  &  Capitals,  States  and  Order  of  Entry, 
States  and  Date  of  Entry,  States  and  Abbreviations,  Inventors  and 
Inventions,  World  Capitals  &  Countries,  Urban  Areas  and  Population, 
Authors  &  Books,  Presidents  and  Order,  States  and  Largest  City, 
ase  Numbers. 


GRAPHICS:  Front  Cover,  Wierd,  Rat  Race,  Random  Ad,  Fireside, 
Left-Right  Ad,  Blocks,  Herring,  Launch,  Blinker,  Snoopy,  Snow,  Step 
Ad,  Step  Ad  Two,  Graphic  Wards,  War  Games. 

HOME:  Bartender,  Nutrition,  Conversion,  Perpetual  Calendar,  Base 
Conversion.  Calculator,  Vacation  Check-off  List,  Telecode,  Message 
Board,  Night  Check-off  List,  Expense  Account,  Babysitter,  Drunk- 
ometer,  Remember,  Christmas  List,  Mileage. 

GAMES:  Jumble,  Search,  Memory  Quiz  Letters,  Sting  Ray,  Russian 
Roulette,  Wheel  of  Fortune,  Towers,  Decision,  Memory  Quiz  Numbers, 
Doomsday,  Star  Trek,™  Sketch,  Flipper,  Life,  Fifteen,  Speedy,  Count, 
Road  Race,  Stars,  Odd  One,  Spy  Ship,  Horse  Race,  Scissors,  Craps, 
Star  Blazer,  Tiger  Shark,  Unjumble,  Mind  Reader,  Roach  Race, 

Jumble  2,  Gypsy. 

The  price  for  the  LIBRARY  100  is  only  $49.50.  That’s  less  than 
$.50  per  program.  Join  the  thousands  of  users  who  are  already  enjoy¬ 
ing  this  exceptional  software  package.  Only  from  TBS.  (We  are 
currently  working  on  a  Library  for  the  APPLE.) 

TBS  has  other  great  software  for  your  TRS-80.  CHECKBOOK  II, 
INFO  SYSTEM,  &  EXERCISER  are  general  applications.  BASIC 
TOOLKIT,  SYSTEM  DOCTOR  &  TERMINAL  CONTROL  are  systems 
utilities.  BUSINESS  MAIL  LIST,  DATA  MANAGER,  CHECK 
REGISTER  ACCOUNTING  SYSTEM  &  ANALYSIS  PAD  are  strong 
applications  for  business.  TBS  also  has  DISK  HEAD  CLEANERS 
for  TRS-80  and  APPLE  and  GRAN  MASTER  DISKETTES,  the 
best  on  the  market. 

TBS  is  YOUR  COMPANY,  and  to  you  we  pledge  to  produce 
quality  software  at  a  price  you  can  afford.  The  above  products  are 
available  NOW  at  Computer  Stores  and  Associate  Radio  Shack 
Stores  nationwide  or  directly  through  us.  For  more  information 
please  contact  us  at  the  numbers  below. 

™  Paramount  Pictures,  Corporation. 


THE  BOTTOM  SHELF,  UK. 

(404)939-6031  •  P.0.  Box  49104-P  •  Atlanta,  GA  30359 


CIRCLE  7 


FEEDBACK 


Pet  Anomaly 

Dear  Editor: 

In  a  Feedback  letter  in  the  September 
1979  issue,  Lon  Poole  notes  that  his 
Day  of  the  Week  program  (which  ap¬ 
peared  in  the  July  1979  issue)  does  not 
work  correctly  on  the  Commodore  Pet 
due  to  an  anomaly  of  Pet  arithmetic. 

I  ran  the  program  (without  Poole’s 
“fix”)  on  my  Pet  and  produced  correct 
results  for  the  dates  in  Poole’s  article 
and  for  several  other  dates.  Would  you 
please  ask  Poole  to  explain  what  incor¬ 
rect  results  he  got  and,  more  impor¬ 
tantly,  what  the  anomaly  is? 

Charles  I.  Goldman 
Philadelphia,  PA 

Author  s  note:  The  problem  seems  to 
be  with  the  INT(  )  function  in  conjunc¬ 
tion  with  an  apparent  rounding  error. 
For  example,  the  Pet  maintains  that  the 
expression  INT((  1 E -  20)  -  ( 1  / .  1 ))  does 
not  equal  the  expression  INT((1/.1)+ 
(IE— 20)).  Furthermore,  INT((l/.l)- 
(1E-20))  is  greater  than  INT(l/.l). 
You  can  run  the  following  program  on  a 
Pet  to  see  this  for  yourself. 


10 

IF  INT((lE-20)- 
(1/.1))<>INT((1/.1)+ 
(1E-20))THEN  30 

20 

PRINT  "EQUAL" 

25 

GOTO  40 

30 

PRINT  "NOT  EQUAL" 

40 

IF  INT((l/.l)-(lE-20)) 
>INT(l/.l)  THEN  60 

50 

PRINT  "LESS  OR  EQUAL" 

55 

GOTO  70 

60 

PRINT  "GREATER" 

70 

STOP 

I  do  not  know  why  the  Pet  behaves 
this  way,  nor  can  I  explain  why  adding 
the  statement  N=N  on  line  145  in  “Day 
of  the  Week”  fixes  the  error  apparently 
caused  by  the  use  of  the  INT(  )  function 
on  lines  130  and  140.  The  error  only 
manifests  itself  with  a  few  dates.  Un¬ 
fortunately,  I  did  not  keep  my  notes  on 
which  dates  don’t  work. 

There  are  other  Pet  “features”  which 
there  is  not  room  to  describe  here  but 


which  are  described  in  the  book  Pet 
Users  Guide  which  will  soon  be  pub¬ 
lished  by  Osbome/McGraw-Hill. 

Lon  W.  Poole 
Osbome/McGraw-Hill 

POKEing 
Your  PET 

Editors: 

One  final  comment  on  “Line  Re¬ 
numbering  on  the  Pet”  (March  1979): 
You  can  change  the  starting  line 
number  for  the  renumbered  program  by 
POKEing  the  desired  value  into 
memory  locations  7259  and  7454.  To 
change  the  interval  between  renumber¬ 
ed  lines,  POKE  your  choice  into  7300 
and  7484.  All  of  these  locations  con¬ 
tained  the  decimal  value  10  in  the 
machine-language  program  as  pub¬ 
lished. 

Mark  Zimmermann 
Pasadena,  CA 


More  on  Copyrights 

Dear  Editor, 

In  response  to  the  letter  concerning 
software  copyright  infringement  (Feed¬ 
back,  October  1979),  I  feel  compelled 
to  comment.  I  am  not  an  attorney 
either,  so  these  are  only  my  opinions. 
However,  I  have  had  journalism 


classes,  writing  experience  and  photo¬ 
graphic  experience  which  has  occa¬ 
sioned  a  familiarity  with  the  copyright 
laws.  I  have  followed  this  software 
copyright  problem  through  several 
magazines  and  texts,  up  to  and  includ¬ 
ing,  an  editor’s  (not  Personal  Comput¬ 
ing)  request  that  readers  should  report 
their  friends  for  infringement  and  re¬ 
ceive  a  reward. 

My  feelings  are  that  fear  of  infringe¬ 
ment  far  exceeds  the  actuality.  Also 
there  are  deterrents  and  compensations 
against  infringement,  most  recently 
implemented  against  “music  pirates”, 
which  keep  all  but  the  most  unsavory 
from  practicing  in  this  area. 

More  to  the  point  of  the  Feedback 
letter,  how  do  we  (the  readers  of  PC) 
avoid  unconscious  infringement?  Per¬ 
haps  these  questions  will  help  others  as 
they  have  helped  me: 

1 .  Is  my  program  solving  a  similar 
problem  using  the  equations, 
formula  or  statements  as  used  in 
the  original  program? 

2.  Is  the  structure  (arrays,  data, 
jumps)  of  my  program  basically 
the  same  as  the  original? 

3.  Do  my  modifications  have  little 
or  no  effect  on  the  flow,  proc¬ 
esses  and/or  results  of  the  origi¬ 
nal  program? 

If  the  answer  is  “yes”  to  all  or  most 
of  the  above,  then  I  have  usually 
changed  the  application  of  the  original 
program,  not  the  program. 

In  closing,  I  want  to  thank  Personal 
Computing  for  the  fair  and  intelligent 
treatment  of  a  very  controversial  sub¬ 
ject.  Your  comparison  of  the  copyright 
problems  in  prose  was  accurate  and 
concise.  Keep  up  the  good  work. 

Howard  Flatley 
El  Cajon,  CA 

Editor  s  note:  If  you’d  like  to  express 
your  opinion  on  the  software  copyright 
problem,  write  to  Feedback,  Personal 
Computing ,  1050  Commonwealth 
Ave.,  Boston,  MA  02215.  We'll  pub¬ 
lish  the  best  and  most  interesting 
letters.  — D.W. 


FEEDBACK 

Computer-less 

Calculations 

Dear  Editors: 

Bruce  Barnett’s  article  “How  to 
Program  a  Complex  Problem”  (Sep¬ 
tember  1979)  provides  a  thoroughly 
understandable  and  enlightening 
example  of  the  program  development 
thought  process.  However,  one  doesn’t 
need  a  fancy  computer  to  figure  proba¬ 
bilities  for  the  game  of  Risk.  Several 
months  ago  I  calculated  the  relative  ad¬ 
vantages  of  various  combinations  of 
attacking  and  defending  armies,  all 
without  the  aid  of  electronic  circuitry. 

As  the  author  stated,  the  probability 
that  the  attacker  will  lose  2  armies  when 
rolling  3  die  against  the  defender's  2  die 
is  equal  to  the  number  of  ways  this  can 
occur,  divided  by  the  total  number  of 
possible  outcomes.  Since  a  total  of  5 
die  are  rolled  altogether,  the  denom¬ 
inator  of  this  expression  is  simply  65,  or 


Aiding  Visual  Aids 

Editor  s  Note:  James  W.  Cemy,  author 
of  “Visual  Aids  for  Business,  Home 
and  School”  in  the  August  1979  PC, 
noticed  a  small  inconsistency  in  the 
article’s  program.  The  message  in  the 
PRINT  statement  at  line  1400  should 
read  “changing  lines  1 120  and  1 130  in 
the  program”  instead  of  “changing 
lines  170  and  180  in  the  program”. 
Also,  Mr.  Cemy’s  affiliation  at  the 
University  of  New  Hampshire  has 
changed  from  Office  of  Academic 
Computing  (line  1070  of  the  program) 
to  the  Computer  Services  department. 

— D.W. 

Hunt  Sentenced 

Editor  s  note:  World  Power  Systems 
executive,  Norman  Henry  Hunt  Jr.  is 
now  serving  a  six  year  sentence  for 
frauds  committed  by  the  bogus  com¬ 
pany,  said  J.W.  Zemblidge,  Postal 
Inspector  in  Tucson,  AZ.  Hunt  entered 
guilty  pleas  to  two  counts  of  mail  and 
wire  fraud  before  U.S.  District  court  in 
Tucson  on  September  17,  1979.  His 
accomplice,  Dinah  Lee  Hunt,  pleaded 
guilty  to  a  one  count  “information 
charging  misprison  of  a  felony”  —  a 


7776  possible  outcomes.  Finding  the 
numerator  is  a  bit  more  complex.  Yet 
with  only  a  quire  of  paper  and  several 
sharp  pencils,  I  managed  to  derive  a 
general  formula  for  the  number  of  dif¬ 
ferent  ways  in  which  the  attacker  loses 
2  armies.  Without  offering  a  mathe¬ 
matical  proof  (mainly  because  I  have 
none),  let  me  simply  show  you,  in 
Figure  1 ,  what  the  number  of  occur- 
ances  happens  to  be. 

Fortunately,  x—  1  can  be  factored  out 
of  the  second  summation,  and  after  ap¬ 
plying  the  formula  for  summation  of 
arithmetic  progressions  and  expanding 


charge  that  she  assisted  in,  but  did  not 
mastermind  or  pilot  the  fraud.  Ms. 
Hunt  received  a  three  year  suspended 
sentence  and  three  years  probation. 

The  Hunts,  who  worked  as  the  hus¬ 
band  and  wife  team  of  James  and  Lee 
Anderson,  ran  the  bogus  mail-order 
company  out  of  Tucson.  Federal  of¬ 
ficials  called  the  scheme  a  “double  bust 
out.”  World  Power  Systems  sent  out 
financial  data  to  suppliers,  ordered 
equipment  on  credit,  but  failed  to  pay 
the  suppliers.  The  company  also  placed 
consumer  ads,  took  cash  orders  from 
customers,  then  sent  out  only  enough 
equipment  to  appear  legitimate,  ac¬ 
cording  to  the  Pima  County  Attorney’s 
Office  in  Arizona. 

Hunt’s  swindle  was  first  discovered 
through  a  WPS  advertisement  in  which 
a  picture  of  the  company’s  I/O  board 
showed  no  circuit  etches.  Hunt  fled 
Arizona  when  he  realized  he  had  been 
discovered.  Meanwhile,  George  Gerry 
Pollack,  the  man  apearing  in  WPS  ads, 
was  arrested.  Pollack  has  since  been 
found  an  “investor’s  victim”  and 
cleared  of  charges,  said  Zemblidge. 

World  Power  Systems  was  not  the 
first  fraud  created  by  Hunt,  who  per¬ 
petrated  similar  schemes  in  Nevada, 
Texas,  California  and  Georgia. 


the  terms,  the  whole  expression  re¬ 
duces  to  Figure  2. 

Evaluating  this  expression  for  values 
of  x  from  1  to  6  produces  the  finite 
series  0  4-  220  +  568  +  846  +  856  + 
400,  which  equals  2890.  Thus  the 
probability  of  the  attacker  losing  2 
armies  is  2890/7776,  or  approximately 
0.372,  which  agrees  with  the  author’s 
own  finding. 

Aren’t  you  glad  you  do  have  a  com¬ 
puter,  Bruce?  I  sure  wish  I  did! 

David  F.  T.  Kretzmann 
Ft.  Meade,  MD 


New  Pet  Cityr 

To  the  Editor: 

I’m  not  sending  this  short  program 
into  your  magazine  as  a  rebuttal  to  your 
published  program  called  “City”  (May 
1979),  but  to  broaden  the  horizons  of 
all  Pet  programmers  and  to  demonstrate 
the  flexibility  of  the  Pet  computer. 

Steve  Kanzer 
New  Hyde  Park,  NY 
10  DIM  fl$<7> 

20  <  1  > = "  S  ■" :  ft*  <  2  > = " m " 

:fi*<3)=MY.V 
30  B$<4>=nwr 

40  PRINT 

50  FOR  L=1  TO  4 
60  FOR  fl= 1  TO  8 
70  B=INKRNDC1>*20>  +  1 
88  0=INT<RND<1>*6>+1 
90  FOR  T=1  TO  B 
100  PRINT 
110  NEXT  T 
120  FOR  V=1  TO  B 
130  PRINT  " 

140  NEXT  V 

150  K= I NT  < RNB  < 1 >  #2 1  >  + 1 
160  FOR  SS=1  TO  K : 

PRINT  "m"; : NEXT  SS 
170  NEXT  R 
180  PRINT  " 1" ; 

190  NEXT  L 

200  FOR  T=1  TO  2500 .NEXT  T 
210  GOTO  40 


RADIO  SHACK  COMPUTER  OWNERS 
TRS-80  MODEL  I  AND  MODEL  II 


MONTHLY 

NEWSLETTER 


PRACTICAL  APPLICATIONS 
BUSINESS 

GAMBLING  •  GAMES 
EDUCATION 
PERSONAL  FINANCE 
BEGINNER’S  CORNER 
NEW  PRODUCTS 
SOFTWARE  EXCHANGE 
MARKET  PLACE 
QUESTIONS  AND  ANSWERS 
PROGRAM  PRINTOUTS 
.  .  .  .  AND  MORE 


PROGRAMS  AND  ARTICLES  PUBLISHED  IN  OUR  FIRST  12  ISSUES 
INCLUDE  THE  FOLLOWING: 

•  A  COMPLETE  INCOME  TAX  PROGRAM  (LONG  AND  SHORT  FORM) 

•  INVENTORY  CONTROL 

•  STOCK  MARKET  ANALYSIS 

•  WORD  PROCESSING  PROGRAM  (FOR  DISK  OR  CASSETTE) 

•  LOWER  CASE  MODIFICATION  FOR  YOUR  VIDEO  MONITOR  OR  PRINTER 

•  PAYROLL  (FEDERAL  TAX  WITHHOLDING  PROGRAM) 

•  EXTEND  16  DIGIT  ACCURACY  TO  TRS-80  FUNCTIONS  (SUCH  AS 
SQUARE  ROOTS  AND  TRIGONOMETRIC  FUNCTIONS) 

•  NEW  DISK  DRIVES  FOR  YOUR  TRS-80 

•  PRINTER  OPTIONS  AVAILABLE  FOR  YOUR  TRS-80 

•  A  HORSE  SELECTION  SYSTEM* *** ARITHMETIC  TEACHER 

•  COMPLETE  MAILING  LIST  PROGRAMS  (BOTH  FOR  DISK  OR  CASSETTE 
SEQUENTIAL  AND  RANDOM  ACCESS) 

•  RANDOM  SAMPLING***BAR  GRAPH 

•  CHECKBOOK  MAINTENANCE  PROGRAM 

•  LEVEL  II  UPDATES***LEVEL  II  INDEX 

•  CREDIT  CARD  INFORMATION  STORAGE  FILE 

•  BEGINNER’S  GUIDE  TO  MACHINE  LANGUAGE  AND  ASSEMBLY 
LANGUAGE 

•  LINE  RENUMBERING 

•  AND  CASSETTE  TIPS,  PROGRAM  HINTS,  LATEST  PRODUCTS 

COMING  SOON  (GENERAL  LEDGER,  ACCOUNTS  PAYABLE  AND 
RECEIVABLE,  FORTRAN-80,  FINANCIAL  APPLICATIONS  PACKAGE, 
PROGRAMS  FOR  HOMEOWNERS,  MERGE  TWO  PROGRAMS, 
STATISTICAL  AND  MATHEMATICAL  PROGRAMS  (BOTH 
ELEMENTARY  AND  ADVANCED)  .  .  .  AND 


WORD  PROCESSING  PROGRAM  (Cassette  or  Disk) 

For  writing  letters,  text,  mailing  lists,  etc.,  with  each  new  subscriptions  or  renewal. 


LEVEL  II  RAM  TEST  - 


Checks  random  access  memory  to  ensure  that  all  memory  locations  are  working  properly. 


SEND  FOR  OUR  36  PAGE  SOFTWARE  CATALOG  (INCLUDING  LISTINGS  OF  HUNDREDS  OF  TRS-80  PROGRAMS  AVAILABLE 
ON  CASSETTE  AND  DISKETTE).  $2.00  OR  FREE  WITH  EACH  SUBSCRIPTION  OR  SAMPLE  ISSUE. _ 


The  TRS-80  Monthly  News  Magazine  is  not  sponsored  nor  in  any  way  officially  sanctioned  by  Radio  Shack  or  the  Tandy  Corporation. 


iCQMPUTRQNICSi 

MATHEMATICAL  AFF^JCATTONS  SERVICE  ^ _ 

Box  149  New  City,  New  York  10956 

ONE  YEAR  SUBSCRIPTION  $24  . 

TWO  YEAR  SUBSCRIPTION  $48  . 

SAMPLE  OF  LATEST  ISSUE  $  4  . 

START  MY  SUBSCRIPTION  WITH  ISSUE _ 

(#1  -  July  1978  •  #7  -  January  1979  •  #12  -  June  1979) 

NEW  SUBSCRIPTION _  RENEW AI _ 

CREDIT  CARD  NUMBER  _ 

SIGNATURE  _ 

NAME _ 


HOUR 

24  ORDER 
LINE 

(914)  425-1535 


EXP.  DATE 


ADDRESS 


***  ADD  S6/YEAR  (CANADA,  MEXICO)  ADD  $  12/YEAR  AIR  MAIL  -  OUTSIDE  OF  U.S.A.,  CANADA  &  MEXICO  *** 


RANDOM  ACCESS 


Gan  Personal  Computers 
Re-Create  Missing  Links? 


Can  personal  computing  systems 
trace  evolutionary  trends  and  re¬ 
create  missing  links  in  the  earlier 
development  of  a  species? 

This  startling  idea  grows  out 
of  work  done  by  Professor 
D'Arcy  Thompson  over  half  a 
century  ago.  Although  I  have 
long-hoped  to  carry  on  Dr. 
Thompson's  research,  my  own 
writing  commitments  have  so  far 
prevented  this.  If  any  reader 
would  like  to  do  some  original, 
pioneering  scientific  research 
with  his  personal  computer, 
here’s  an  opportunity. 

I  n  his  book  Growth  and  Form , 
Thompson  invented  a  novel  ap¬ 
plication  of  curvilinear  coordin¬ 
ate  transformations.  Thompson 
proved  that  a  skull  or  body  of 
one  species  drawn  in  a  frame¬ 
work  of  curvilinear  coordinates 
looks  exactly  like  the  skull  or 
body  of  another  species  drawn 
in  a  Cartesian  framework;  and 
that  the  more  closely-related  the 
species  (even  if  unrelated  in  ap¬ 
pearance),  the  simpler  would  be 
the  transformation.  Thompson 
suggested  that  use  of  this  method 
might  provide  a  clue  to  the  laws 
of  growth  in  the  evolution  of 
species. 

When  Thompson  drew  the  spe¬ 
cies  of  the  genius  Diodon  —  a  fish 
rather  typical  in  appearance  (that 
is,  looking  like  a  fish  should 
look)  —  on  graph  paper  and  then 
deformed  the  coordinates,  some¬ 
thing  unusual  occurred:  the  new 
fish  (almost  round  in  appear¬ 
ance)  was  now  the  sunfish  Ortha- 
goriscus,  a  fish  known  to  marine  <• 
biologists  to  be  closely-allied  to 
the  former  species.  As  Thompson 
explained:  4II  deformed  its  verti¬ 
cal  coordinates  into  a  system  of 
concentric  circles  and  its  horizon¬ 
tal  coordinates  into  a  system  of 
curves  which  resemble  a  system 
of  hyperbolas.  The  old  outline 
transformed  in  its  entirety  to  the 
new  network  appears  as  a  mani¬ 


fest  representation  of  the  closely- 
allied  but  very  different-looking 
sunfish  Orthagoriscus." 

With  his  curiosity  piqued  by 
this  startling  revelation, 
Thompson  carried  his  research 
further.  By  mapping  a  human 
skull  in  a  Cartesian  framework, 
using  it  as  a  baseline  and  trans¬ 
forming  it,  he  was  able  to  re¬ 
create  a  chimpanzee's  skull  as 
a  projection  of  the  original 
rectangular  system.  Further 
transforming  the  coordinates, 
he  produced  skulls  of  other 
species.  The  more  distantly 
removed  was  the  species,  the 
greater  was  the  transformation 
needed. 

Though  he  pursued  the  re¬ 
search  even  further,  extending  it 
to  other  animals,  Thompson’s 
research  was  to  remain  undevel¬ 
oped  —  an  avenue  unexplored  by 
modern  researchers  in  archaeol¬ 
ogy,  paleontology  and  the  life 
sciences. 

The  significance  of  these  inter¬ 
relationships  from  a  mathe¬ 
matical  viewpoint  now  awaits 
further  researching.  Due  to  the 
extensive  computational/graph¬ 
ical  capabilities  required,  this 
research  is  well-suited  to  the 
personal  computerist. 

With  the  unfortunate  situation 


of  fossil  remains  identified  for 
only  portions  of  a  species  at 
certain  fractional  periods  of  its 
development,  large  gaps  exist  in 
our  picture  of  past  specifics.  It’s 
much  like  taking  a  snapshot  of 
a  certain  species  at  intervals  of 
time  —  sometimes  millions  of 
years  apart  —  and  then  trying  to 
piece  its  evolution  together  from 
this  jigsaw  puzzle.  Furthermore, 
many  fossil  remains  do  not  usu¬ 
ally  include  the  total  skull  or 
animal  because  portions  are 
often  missing.  It  is  here  that  the 
interpolative  power  of  the  com¬ 
puter  can  be  invaluable,  since 
programs  that  can  be  generated 
will  be  able  to  interpolate  be¬ 
tween  these  known  fossils,  filling 
in  the  so-called  missing  links.  It  is 
also  possible,  with  the  proper  re¬ 
search,  that  you  may  be  among 
the  first  to  accurately  project 
evolutionary  trends  of  species 
into  the  future. 

This  field  could  represent  a 
totally  new  area  of  original  re¬ 
search  for  the  personal  com¬ 
puter;  and  this  is  just  one  of 
many  more  applications  that 
await  those  curious  enough  to 
pursue  them. 

—  Paul  Snigier 
The  author  is  editor  of  PC’s  sister 
publication  Digital  Design. 


RANDOM  ACCESS 


When  an  individual  contacts  a 
travel  agent  to  book  a  cruise, 
that  agent  then  calls  CCL. 
Twenty  reservationists  use  the 
Dasher  screens  to  display  “sail¬ 
ing  availability"  information, 
which  lists  the  cabins  available 
on  the  ship  scheduled  for  the  de¬ 
sired  destination,  along  with 
cruise  rate  and  cruise-plus-air  rate. 
The  travelers  choose  which  cabin 
and  which  travel  package  they 
want. 

A  $100/person  deposit  re¬ 
serves  a  cabin.  Reservationists 
use  the  display  terminals  again  to 
enter  the  traveler's  names  and  as¬ 
sign  a  cabin  number,  and  cashiers 
note  the  deposit  payment.  Line 
printers  generate  a  reservation 
confirmation  mailer  and  a 
deposit  receipt  which  are  for¬ 
warded  to  the  travel  agent. 
Groups  of  up  to  100  people  are 
handled  in  the  same  fashion. 

Every  detail  pertaining  to 
every  passenger’s  trip  is  recorded 
in  the  system.  CCL  arranges  air 
or  ground  transportation  to 
Miami,  limousine  service  to  and 
from  terminals,  hotel  accommo¬ 
dations,  even  car  rentals,  if  re¬ 
quested.  All  of  this  information, 
stored  in  the  Eclipse,  can  be  re¬ 
ferred  to  with  a  few  keystrokes. 

CCL  also  uses  the  computer 
system  to  inquire  about  sales. 


Cruise  Line  Enjoys  Smooth  Sailing 


Champagne,  gourmet  meals, 
casinos,  entertainment  and  sun 
make  glorious  and  glamorous 
vacation  cruises  for  travelers.  But 
the  logistics  for  planning  cruises 
are  not  quite  as  glamorous  for 
the  weary  cruise  line. 

Carnival  Cruise  Lines  in  Miami 
streamlined  the  planning  process, 
saved  several  thousand  dollars  a 
year  in  operating  costs,  increased 
revenues  by  several  hundred 
thousand  dollars  and  improved 
office  efficiency  by  installing  a 
minicomputer  system  to  book 
passengers,  assign  cabins,  arrange 
travel  to  Miami,  track  payments, 
perform  sales  inquiries,  handle 
special  requests  and  record  can¬ 
cellations,  said  the  cruise  line. 

A  seven-year  old,  Miami-based 
firm  with  an  annual  passenger  re¬ 
venue  of  approximately  $100 
million,  CCL  books  over  150,000 
vacationers  a  year  on  seven-day 
cruises  from  Miami  to  San  Juan, 
Puerto  Rico,  St.  Thomas  and  St. 
Croix,  Virgin  Islands;  Samana, 
Dominican  Republic;  and  Nassau, 
the  Bahamas.  Individuals  or 
groups  may  travel  on  the  cruise 
and  provide  their  own  transporta¬ 
tion  to  Miami,  or  book  one  of 
CCL’s  packaged  trips:  “Fly 
Aweigh"  or  “Fly  Free",  all  in¬ 
clusive  air/sea  programs  which  in¬ 
clude  airfare,  ground  transporta¬ 
tion  and  the  cruise. 

Cruise  line  vessels  include  the 
Mardi  Gras  and  Carnivale,  both 
1200-passenger  ships,  and  the 
1420-passenger  Festivale.  A 
fourth  ship  will  be  added  to  the 
line  in  December  1981  and  pos¬ 
sibly  a  fifth  shortly  thereafter, 
said  CCL. 

According  to  CCL’s  data  pro¬ 
cessing  manager,  Jim  Bussey, 
cabin  assignments,  payments  and 
option  expiration  dates  (the  date 
cabin  reservations  are  cancelled 
due  to  non-payment  of  balance) 
for  each  sailing  were  formerly  re¬ 
corded  manually  in  berthing 
books.  But  because  different  de¬ 
partments  are  responsible  for 
performing  these  tasks,  the 
books  were  in  constant  demand. 
In  addition,  Bussey  said,  the 


information  entered  into  the 
berthing  books  was  hand-written, 
which  added  legibility  problems. 

Because  the  berthing  book  me¬ 
thod  was  time-consuming  and  in¬ 
efficient,  CCL  decided  to  find  a 
better  method  of  travel  planning. 

Galaxy  World  Tours,  a  Los 
Angeles  tour  operator  working 
with  CCL,  told  Bussey  about 
their  computerized  travel  system. 
Enthusiastic  with  their  Data  Ge¬ 
neral  Eclipse  Data  system, 

Galaxy  invited  CCL  to  see  their 
computer  in  operation.  Integral 
BusinessGomputing  designed 
and  installed  the  system.  “It 
wasn’t  a  cruise  system,”  Bussey 
noted,  “but  the  basics  were 
there,  so  we  didn’t  have  to  look 
any  further." 

IBC  modified  their  travel  sys¬ 
tem  to  suit  CCL’s  cruise  applica¬ 
tion  and  installed  an  Eclipse 
C/330  with  512K  bytes  of 
memory,  two  96-megabyte  disks, 
one  10-megabyte  disk,  a  300-lpm 
printer,  a  900-lpm  printer  and  35 
Dasher  display  terminals  at 
CCL’s  Miami  headquarters.  The 
system,  operational  since  Novem¬ 
ber  1978,  runs  on  Data  General’s 
Real-time  Disk  Operating  System. 
Programs  are  written  in  Fortran. 
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Bookings  are  usually  made  six 
months  to  a  year  in  advance  of 
sailing.  Formerly,  it  took  a  full 
week  to  count  all  these  bookings 
one  by  one  in  the  berthing  books. 
Now  it  takes  as  little  as  two 
hours  to  determine  how  many 
passengers  have  been  booked  per 
ship. 

In  addition  to  confirmations, 

receipts  and  tickets,  the  com¬ 
puter  printers  generate  a  passen¬ 
ger  manifest,  which  includes  the 
names  of  all  passengers  booked, 
their  cabin  numbers,  cruise  ticket 
number  and  embarkation  point. 
Previously,  the  berthing  books 
were  handed  over  to  a  service  bu¬ 
reau  four  days  before  departure. 
The  bureau  would  keypunch  the 

passenger  data  listed  in  the  books 
into  a  computer  to  prepare  this 
report.  But  while  the  service  bu¬ 
reau  had  the  books  for  four  days, 
CCL  had  to  make  do  without 
them.  A  service  report,  also  pre¬ 
pared  by  the  computer,  lists  re¬ 
quests  and  special  needs  of  pas¬ 
sengers  —  a  special  diet,  a  bottle 
of  wine,  a  wheel  chair,  or  a  cot. 

Eye  Banks  Rely  on  Ck 

The  patient,  a  41-year-old 

Atlanta  accountant,  had  noticed 
the  sight  deteriorating  in  his  right 
eye.  He  had  the  feeling  he  was 
continually  looking  through 
frosted  glass. 

An  examination  disclosed  that 
the  cornea  —  the  transparent 
membrane  forming  part  of  the 
outer  coating  of  the  eye  —  was 
coned-shaped,  a  condition 
known  as  kerataconus,  instead  of 
round. 

Fortunately,  through  the  help 
of  the  Georgia  Lions  Eye  Bank 
and  Emory  University's  Com¬ 
puting  Center,  suitable  donor  tis¬ 
sue  was  quickly  located  in 

Houston  and  rushed  by  air  to 
Atlanta.  Timeliness  in  using  new 
tissue  is  essential  since  the  speci¬ 
men  can  only  be  preserved  for 
five  days. 

The  corneal  transplant  opera¬ 
tion  performed  in  the  Emory  Uni¬ 
versity  Hospital  was  a  complete 
success  and  the  patient  was  able 
to  read  his  wristwatch  for  the 
first  time  in  months. 

The  Georgia  Lions  Eye  Bank, 
operated  in  conjunction  with  the 
Emory  University  Department 
of  Ophthalmology,  is  one  of  18 
eye  banks  throughout  the  United 
States  now  linked  into  a  com¬ 
puter-communications  network 
centered  on  the  University's 

Sperry  Univac  90/80  system. 

The  network  started  in  Jan¬ 
uary  1979  with  17  eye  banks,  ac¬ 
cording  to  Ron  Wood,  Coordin¬ 
ator  of  Information  Systems  and 
Programs  at  the  Emory  Univer¬ 
sity  Computer  Center,  who  de¬ 
signed  the  program  for  the  eye 
bank  system.  Since  that  time, 
additional  eye  banks  have  ex¬ 
pressed  interest  in  joining  the 

miputers 

network,  Wood  said. 

Each  eye  bank  has  a  terminal 
with  dial-up  capabilities  and  is 
linked  to  the  computer  system  in 
the  Computer  Center  over  a  110- 
300  baud  communications  line. 

Planning  for  the  system  started 
in  the  fall  of  1978  when  Wood 
was  approached  by  the  Georgia 
Lions  Eye  Bank  to  see  if  there 
was  a  method  of  locating  cornea 
tissue  in  a  faster  and  more  eco¬ 
nomical  way. 

Janie  Benson,  Executive  Di¬ 
rector  of  the  Georgia  Lions  Eye 
Bank,  recalls  the  problems  that 
led  to  the  new  computerized 
technique  being  introduced. 

“Previously  when  we  required 
tissue  we  usually  had  to  make 
several  long  distance  telephone 
calls  to  eye  banks  all  over  the 
United  States  before  locating 
what  was  needed.  It  wasn’t 
only  time  consuming  but  also 
expensive. 

“Finally  we  felt  that  a  com¬ 
puterized  data  base  for  a  Tissue 
Inventory  System  (TIS)  was  the 
only  answer.  In  response  to  our 
idea  we  received  complete  co¬ 
operation  from  Ron  Wood  and 

Dr.  Buell  Evans,  Director  or  the 
Emory  University  Computer 

Center.  A  special  program  was 
prepared  and  the  computer-com¬ 
munications  network  became  a 
reality  on  January  8,  1979. 

“For  the  most  part  the  18  eye 
banks  in  the  system  are  operated 
by  various  Lions  Club  orga¬ 
nizations  in  the  different  states 
in  association  with  hospitals  or 
medical  schools  in  their  areas," 

Ms.  Benson  noted. 

In  addition  to  Atlanta,  the 
other  eye  banks  are  in  Washing¬ 
ton  D.C.;  New  York  City 

and  Rochester,  NY;  Gainesville, 

FL;  Iowa  City,  1  A;  Baltimore, 

MD;  Columbus  and  Cleveland, 

OH;  Dallas  and  Houston,  TX; 
Portland,  OR;  Nashville,  TN; 
Augusta,  GA;  Omaha,  NE; 

Madison,  Wl;  Richmond,  VA; 
and  Kansas  City,  MO. 

When  a  cornea  becomes  avail¬ 
able,  key  information  is  entered 
into  the  computer's  data  bank: 
name  and  address  and  24-hour 
telephone  number  of  the  eye 
bank  offering  the  tissue;  the  date 
and  time  the  tissue  was  entered 
in  the  system;  the  type  of  tissue 
preservation;  medical  infor¬ 
mation  about  the  donor  —  age, 
cause  of  death,  data  and  time 
of  death,  date  and  time  the  tis¬ 
sue  was  removed,  date  and  time 
of  tissue  preservation  and  the 
results  of  a  slit  lamp  examination 
of  the  tissue.  Each  cornea  tis¬ 
sue  is  assigned  a  number  in  the 
data  base  by  the  computer. 

An  Eye  Bank  entering  infor¬ 
mation  on  donor  cornea  tissue  is 
responsible  for  removing  the 
entry  from  the  system  once  it  is 
placed.  To  keep  the  list  current, 
tissue  not  removed  from  the  list¬ 
ing  by  an  Eye  Bank  is  automat¬ 
ically  removed  by  the  com¬ 
puter  after  three  days. 

When  located,  the  cornea  tis¬ 
sue  is  packed  in  ice  in  a  styro¬ 
foam  container  and  shipped  by 
air.  Because  of  the  demand  and 
its  short  preservation  life  span, 
tissue  never  remains  available 
very  long  in  the  data  base. 

About  350  cornea  transplants 
are  performed  at  Emory  Univer¬ 
sity  Hospital  and  about  10,000 
throughout  the  United  States  on 
an  average  each  year.  Since  the 
computer  network  was  organ¬ 
ized,  75  transfers  of  tissue  have 
been  effected  under  the  system. 
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Computers  Provide  Individualized  Instruction 


In  an  age  of  overcrowded  class¬ 
rooms,  where  the  one-on-one 
student/teacher  relationship 
has  all  but  disappeared,  over 
6000  students  at  one  community 
college  have  discovered  that 
individualized  instruction  need 
not  become  a  thing  of  the  past. 

With  the  help  of  12  video  dis¬ 
play  terminals  housed  in  the 
school's  library,  Santa  Ana  Com¬ 
munity  College  students  in  every 
department  from  computer 
science  to  physical  education  are 
reaping  the  benefits  of  person¬ 
alized  instruction. 

“The  terminals  provide  stu¬ 
dents  with  access  to  over  400 
Computer  Assisted  Instruction 
programs  in  such  diverse  subject 
areas  as  psychology,  biology,  art, 
government  and  mathematics," 
explained  Dean  Strenger,  Dean 
of  Science  and  Technology. 
“These  tutorial  programs  are  de¬ 
signed  to  help  students  learn  or 
review  new  material  as  well  as 
overcome  problem  areas  in 
certain  subjects. 


“If  a  student  is  having  dif¬ 
ficulty  with  a  factoring  concept 
in  algebra,  for  example,  he  can 
call  up  a  related  program  and  the 
terminal  will  act  as  a  tutor  to 
the  student,  taking  him  through 
exercises  which  prompt  skills  and 
development  in  that  particular 
area." 

There  is  an  entire  menu  of 
programs  available  to  students 
ranging  from  a  program  which 
teaches  how  to  play  tennis  to  one 
which  reviews  art  vocabulary. 

“The  programs  serve  as  a  re¬ 
view  tool  as  well  as  an  equalizer 
in  classes  where  there  is  a  broad 
level  of  ability,"  Strenger  said. 
“In  one  business  course,  student 
grades  improved  5  to  10  percent 
when  a  program  summarizing 
class  material  was  mandatory." 

The  terminals,  which  include 
nine  Lear  Siegler  ADM-3  Dumb 
Terminal  consoles  and  three 
ADM-1  terminals,  were  installed 
in  the  library  about  three  years 
ago  specifically  for  instructional 
purposes.  They  are  being  used  on 
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Source:  Zenith  Data  Systems 


Reserach  by  Zenith  Data  Systems  shows  that  the  microcomputer 
market  nearly  doubled  between  1977  and  1979.  This  growth  is 
expected  to  continue,  with  the  market  increasing  an  estimated  350 
percent  by  1984.  Charts  above  show  the  major  segments  of  this  mar¬ 
ket  in  the  three  years,  1977,  '79  and  '84,  and  the  change  that  has 
taken,  or  will  take,  place  there.  Most  significant,  between  1977  and 
1979,  the  small  business  and  professional  segment  grew  from  30  per¬ 
cent  to  70  percent  of  the  market.  Sales  of  small  computers  for  busi¬ 
ness  and  professional  applications  will  continue  to  grow  along  with 
the  market  as  a  whole,  but  by  1984,  home  computers  could  emerge 
as  the  major  market  segment,  with  50  percent  of  the  business  for 
microcomputers. 


a  Hewlett-Packard  2000  mini¬ 
computer.  Previously,  the  college 
had  been  using  teletypes,  which, 
according  to  Strenger,  “were 
expensive  to  maintain  and  very 
limited  in  scope  for  student 
needs.” 

In  addition  to  the  CAI  pro¬ 
grams,  the  Lear  Siegler  terminals 
are  being  used  for  other  applica¬ 
tions  as  well. 

For  example,  computer  sci¬ 
ence  students  in  introductory 
computer  classes  are  using  the 
terminals  to  learn  computer  lan¬ 
guage  and  programming  con¬ 
cepts.  The  terminals  afford  the 
students  hands-on  experience 
and  provide  a  natural  facilitation 
for  what  they  are  studying. 

The  department  is  also  using 
the  terminals  for  information  re¬ 
trieval  purposes  for  students  in 
computer  assembly  language 
classes. 

Santa  Ana  Community  Col¬ 
lege's  system  usage  doesn't  stop 
at  academic  applications.  Stu¬ 
dents  in  a  physical  fitness  class 
are  also  using  the  terminals  to 
keep  track  of  their  weekly  phys¬ 
ical  activities. 

“In  the  beginning  of  the  class, 
students  are  given  a  battery  of 
tests  to  determine  fitness," 
Strenger  explained.  “The  tests 
measure  flexibility,  strength, 
lung  functions,  percentage  of 
body  fat  and  heart  rate.  A  fit¬ 
ness  program  based  on  these  test 
results  is  then  worked  out  for 
each  student. 

“The  student  is  responsible  for 
earning  a  certain  number  of 
points  each  week  by  participat¬ 
ing  in  various  physical  activities. 
Each  type  of  activity,  such  as 
running,  swimming,  cycling  and 
racquetball,  is  assigned  a  point 
value.  Running  an  eight-minute 
mile,  for  example,  would  earn 
five  points  while  playing  an  hour 
of  racquetball  would  be  worth 
11  points. 

“Each  week  the  student  enters 
his  qr  her  weekly  activities  into 
the  terminal.  The  system  re¬ 
sponds  by  giving  weekly  and 
cumulative  point  and  mileage 
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totals.  This  information  is  then 
passed  on  to  the  instructor  for 
evaluation  purposes.  If  there  is  a 
discrepancy  between  perform¬ 
ance  and  recorded  level  of  activ¬ 
ity,  the  instructor  can  use  the 

terminal  to  call  up  a  detailed  list¬ 
ing  of  an  individual  student’s 
weekly  records.” 

The  college  plans  to  develop 
and  expand  current  applica¬ 
tions  as  well  as  to  link  the  ter- 

minals  up  with  the  mainframe 
computer  in  the  computer  cen¬ 
ter,  said  Strenger.  This  link-up 
would  allow  students  to  work  in 
Fortran  and  Cobal  in  addition 
to  BASIC. 

Up,  Up  and  Away:  L 

When  the  Space  Shuttle  program 
gets  into  full  swing,  up  to  60 
shuttle  flights  will  be  launched 
per  year  from  the  Kennedy 

Space  Center  at  Cape  Canaveral, 
FL,  and  the  Vanderberg  Air 

Force  Base  at  Lampoc,  CA.  Al¬ 
though  a  long  way  short  of  the 
5824  airline  shuttles  yearly  be¬ 
tween  Boston  and  New  York, 
the  Space  Shuttle  is  still  a  giant 
increase  in  space  program 
launches.  Fifty  million  dollars 
worth  of  Honeywell  computers 
will  handle  those  launches. 

Up  to  three  launches  will  be  in 
preparation  at  each  site  at  any 
one  time.  Two  large  computers, 
as  well  as  an  integrated  network 
of  minicomputers,  displays,  spe¬ 
cial  hardware  and  software,  work 
together  to  launch  the  shuttles. 
This  combination,  otherwise 
known  as  the  Launch  Processing 
System  (LPS),  is  made  up  of  the 
Central  Data  Subsystem  (CDS) 
and  the  Checkout,  Control  and 
Monitor  Subsystem  (CCMS). 

The  Kennedy  Space  Center's 
CDS,  consisting  of  two  Honey¬ 
well  dual-processor  66/80  sys¬ 
tems,  completed  performance 
testing  recently,  and  all  support 
systems  are  go  for  the  first 
shuttle  launch  scheduled  for  mid- 
1980.  A  similar  Vanderberg  in¬ 
stallation  has  completed  the  first 
phase  of  a  three-phase  installa¬ 
tion  program  enroute  to  its  first 
launch  in  1983. 

Al  Brobson  from  Honeywell 
explained  that  the  CDS  uses  pri¬ 
mary  and  secondary  computers, 
each  having  its  own  operating 
system  software  but  sharing  main 
memory,  peripherals  and  commu¬ 
nications.  Each  performs  differ¬ 
ent  tasks,  but  should  the  primary 
system  fail,  a  mandatory  NASA 
requirement  is  that  the  second¬ 
ary  system  flush  its  workload 

aunching  the  Space  Sh 

and  take  on  the  primary  role 
within  10  seconds. 

CDS  configuration  into  two 
computer-support  systems  iso¬ 
lates  direct  shuttle-support  tasks 
from  non-direct  tasks.  The  direct 
or  primary  tasks  provide  shuttle 
check-out  engineers  immediate, 
on-line  access  to  information  re¬ 
quired  to  run  tests  and  make 
flow-critical  decisions.  In  other 
works,  the  primary  CDS  com¬ 
puter  system  provides  dedicated 
on-line  support  to  the  CCMS’s 
network  of  60  minicomputers, 
displays  and  consoles. 

The  secondary  CDS  computer 
system  provides  support  for 
those  non-direct  functions  essen¬ 
tial  to  monitoring  the  shuttle 
flow  schedule.  For  example, 
simulation  of  ground-support 
equipment  and  shuttle  systems 
for  check-out;  software  devel¬ 
opment  and  training;  on-line 
post-test  data  reduction  and 
analysis;  database  management 

uttles 

and  information  processing  re¬ 
quired  by  the  time-critical  flow 
schedule;  console  support  in  labs 
and  engineering  areas,  and  time¬ 
sharing  support  services  for  en¬ 
gineering. 

The  new  distributed-proces¬ 
sing  approach  to  launching  was 
developed  to  allow  ground  opera¬ 
tions  to  be  compatible  with  ve¬ 
hicle  operations,  projected 
launch  rates  and  turnaround 
times,  as  well  as  meeting  the 
economic  objectives  of  the  shut¬ 
tle  program.  Some  of  the  turn¬ 
around  techniques  used  were 
borrowed  from  the  airline  in¬ 
dustry.  All  LPS  consoles  are  sup¬ 
ported  by  a  common  large-scale 
processing  capability  represented 
by  the  Honeywell  66/80s.  Each 
console  computer  supports  a  con¬ 
sole  group  that  commands  and 
monitors  certain  functions; 
everything,  for  example,  to  do 
with  propellants  is  controlled 
from  one  console  group. 

Computer  Protects  Ar 

Rembrandt  might  have  been  con¬ 
fused  by  it  all.  Surely,  El  Greco 
would  have  been  astonished.  Un¬ 
doubtedly,  the  great  artisans  of 
the  past  would  have  never  imag¬ 
ined  their  works  protected  by 
a  computer. 

But,  the  Kimbell  Art  Museum 
in  Texas  does  employ  a  small 
computer  to  control  the  muse¬ 
um 's  air  environment,  and  a 
larger  one  for  security  in  the 
120,000-square-foot,  modern 
complex. 

Not  only  does  the  IBM  Series/ 

1  computer  help  preserve  price¬ 
less  art  and  artifacts  by  Rubens, 
Goya  and  others,  it  is  saving 
energy  and  dollars,  said  a  muse¬ 
um  spokesperson. 

t  Museum 

The  Kimbell  building  —  a 
series  of  self-supporting  cycloidal 
vaults  of  post-tensioned  concrete 
—  was  designed  by  the  late  Louis 

1.  Kahn,  winner  of  the  gold  med¬ 
al  of  the  American  Institute  of 
Architects  and  the  Royal  Society 
of  British  Architects.  In  1973  the 
museum  won  the  highest  award 
of  the  Illuminating  Engineers  So¬ 
ciety,  and  the  1975  Honor 

Award  of  the  American  Institute 
of  Architects,  as  well  as  top  engi¬ 
neering  and  construction  awards. 

“Obviously,  we're  quite  proud 
of  the  Kimbell  —  not  only  for 
what  it  houses,  but  of  the  house 
itself,"  said  spokeswoman 

Shirley  Spieckerman. 

continued 
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The  computer  is  used  for 
power  management/facility  con¬ 
trol,  keeping  inside  humidity  at 
a  constant  50  percent,  and  the 
temperature  at  a  steady  70  de- 

grees.  Precise  control  of  temper¬ 
ature  and  humidity  is  critical  for 
preservation  of  canvasses  and 
the  priceless  oils  painted  on 
them. 

Additionally,  for  security,  a 
larger  computer  monitors  by  tele¬ 
vision  public  areas  of  the  vast 
building  and  all  doorways,  said 
the  building’s  supervisor. 

Faster  Service 

You  may  get  served  faster  than 
ever  if  the  next  cafe  you  dine  at 
uses  AM's  Documentor,  a  new 
electronic  management  control 
system  for  restaurants. 

The  microprocessor-based 
system  consists  of  a  master  key¬ 
board  unit,  up  to  three  remote 
dining  room  order  entry  termi¬ 
nals  that  let  waiters  electroni¬ 
cally  relay  customer  orders 
directly  to  food  preparation 
areas,  and  tab  and  kitchen 
printers. 

The  system’s  enhanced  60K 
bytes  of  memory  simultaneously 
handles  order  information  from 

40  waiters  on  160  menu  items 
and  controls  up  to  200  open 
checks.  Dining  room  personnel, 
using  a  special  terminal  key, 
can  also  call  up  information  on 

150  different  wine  selections 
without  physically  having  to 
check  wine  cellar  inventory, 
said  the  company. 

Waiters  start  transactions  by 
entering  their  employee  and 
check  identification  numbers  — 
along  with  the  food  order  on  a 
dining  room  terminal  keyboard. 

As  order  items  are  keyed  into  the 
system,  they  are  immediately  dis¬ 
tributed  to  printers  placed  in 
kitchen  areas  such  as  salad  prepa¬ 
ration,  hot  entrees  or  dessert. 

Orders  are  printed  out  in  the 
kitchen  as  received.  Food  items 
are  then  prepared  and  picked  up 
by  serving  personnel.  The  Docu¬ 
mentor  master  unit  also  com¬ 
putes  prices,  totals  and  prints  out 
final  checks  when  patrons  have 
finished  their  meals. 

The  Documentor  also  gives 
management  immediate  quan¬ 
tity  reports  on  up  to  30  raw  food 
items  that  a  full  service  restau¬ 
rant  might  carry  in  inventory.  It 
can  provide  35  other  manage¬ 
ment  reports  —  through  software 
programs  —  including  hourly 
sales,  sales  by  food  item,  em¬ 
ployee  productivity  and  payroll 
time-keeping  forlOO  employees. 

The  Greater  Baltimore  Ham- 
boree  and  Computerfest  will  be 
held  Sunday,  March  30,  1980,  at 
the  Maryland  State  Fairgrounds  at 
Timonium.  Personal  and  business 
computer  exhibits  along  with 
dealers  and  hobbyists  will  fill  the 
Exhibition  Hall.  Acres  of  space 
are  available  outside  for  tailgate 
sales  and  swaps.  Many  door 
prizes  will  be  awarded  through¬ 
out  the  day  with  hundreds  of 
dollars  in  cash  prizes  given  away 
at  the  grand  drawing.  Doors  will 
open  at  8:00  a.m.  Admission  is 
$3.  For  more  information  and 
reservations  write  to  Joseph  A. 
Lochte  Jr.,  2136  Pine  Valley  Dr., 
Timonium,  MD  21093,  (301) 
426-8255. 

Announcements 

society  services  include  free  soft¬ 
ware,  free  consultation,  custom 
programming,  conversions  from 
one  BASIC  to  another  and  group 
discounts  on  software  and  hard¬ 
ware.  Membership  is  $15.  For 
more  information  contact  Inter¬ 
national  Society  of  Personal 
Computerists,  4554  Cristy  Way, 
Castro  Valley,  CA  94546. 

The  Microcomputer  Investor  is 
a  publication  for  investors  using 
microcomputers.  For  an  infor¬ 
mation  packet,  send  $2  to: 

MCIA,  902  Anderson  Dr.,  Fre¬ 
dericksburg,  VA  22401.  Back 
issues  are  now  available. 

☆  iV 

computer  and  the  private  physi¬ 
cian  together,  and  assist  physici¬ 
ans  in  using  computers  to  im¬ 
prove  patient  care. 

Subscriptions  are  $15  per 
year.  The  subscriber  will  also  re¬ 
ceive  the  Dr.  Com  Puter  Report , 
the  Medical  Computer  Journal's 
newsletter.  For  information  con¬ 
tact  Dr.  Aziz  A  Ghaussy,  Editor, 
Medical  Computer  Journal,  42 

East  High  Street,  East  Hampton, 

CT  06424;  (203)  267-2934. 

A  Robotics  Interest  Group  has 
been  formed  to  spread  knowledge 
among  experimenters  and  in  the 
robotics  field.  For  more  informa¬ 
tion  send  a  stamped,  self-address¬ 
ed  envelope  to:  G.  Gregoire, 

837  Bourbon  Court,  Mountain 
View,  CA  94040. 

The  Medical  Computer  Jour¬ 
nal,  a  publication  of  the  Doctor's 
Club,  contains  information  about 
the  use  of  computers  in  the  daily 
practice  of  the  private  physician. 
Each  issue  discusses  one  of  the 
most  common  illnesses,  a  com¬ 
puter  system,  laboratory  test  in¬ 
terpretation  and  ideas  for  office 
improvement  through  the  use  of 
the  computer.  The  major  thrust 
of  the  publication  is  to  bring  the 

International  Society  of  Per¬ 
sonal  Computerists  was  organ¬ 
ized  to  promote  and  advance 
personal  computing  on  a  world¬ 
wide  basis.  Tid-Bits,  the  Society’s 
newsletter,  is  intended  to  be  of 
broad  general  interest  to  users 
and  hobbyists.  The  society  also 
publishes  several  other  more 
specialized  newsletters.  Other 

The  Marquette  Computer  So¬ 
ciety  of  Marquette  University  of¬ 
fers  membership  to  all  students 
and  faculty.  For  more  informa¬ 
tion  contact  Marquette  Com¬ 
puter  Society,  610  North  Seven¬ 
teenth  St.,  Suite  206,  Milwaukee, 
Wl  53233. 

Build  your  own  microcomputer 

as  you  learn 

computer  technology  at  home. 

New  from  NRII  The  Most  Complete  and  Up-to-date  Home  Study  Course  Ever  Offered 


As  the  microprocessor  revolutionizes  the 
computer  world  and  microcomputers  appear 
almost  everywhere,  NRI  brings  you  a  new, 
convenient,  and  effective  way  to  keep  up  with 
this  expanding  technology.  It’s  NRI’s  Computer 
Technology  Course,  created  and  designed  exclu¬ 
sively  for  learning  at  home  in  your  spare  time. 

Featuring  NRI’s  Exclusive 
Dual  Language  Microcomputer 

NRI  goes  beyond  book  learning  to 
give  you  practical,  “hands-on”  experience  in 
designing  circuitry,  interfacing  components, 
programming,  and  troubleshooting.  As  you 
learn,  you  actually  assemble  NRI’s  designed-for- 
leaming  microcomputer,  incorporating  the  latest 
advances  in  the  state  of  the  art.  It  looks  and 
operates  like  the  finest  of  its  kind,  actually  does 
more  than  many  commercial  units.  But  NRI 
engineers  have  designed  components  and 
planned  assembly  so  it  demonstrates  important 
principles,  gives  you  working  experience  in  detect¬ 
ing  and  correcting  problems.  And  it’s  yours  to 
keep,  put  to  work  in  your  own  home  or  business. 

You  also  build  and  keep  your  own  test 
instruments,  including  a  transistorized  volt- 
ohm  meter  and  CMOS  digital  frequency  counter. 
And  NRI’s  Discovery  Lab®  broadens  your 
horizons  with  specialized  experiments  and 
theory  demonstrations. 

The  Proven  Way 
to  Learn  at  Home 

You  don’t  have  to  worry  with  travel, 
classes,  or  time  lost  from  work  when  you  learn 
the  NRI  way.  As  they  have  for  more  than  60 


years  of  teaching  technical  subjects,  NRI  brings 
the  material  to  you.  You  study  in  your  spare  time, 
at  your  convenience,  using  “bite-size”  lessons 
that  program  material  into  logical  segments  for 
easier  assimilation.  You  perform  experiments 
and  build  equipment  using  kits  we  supply.  And 
your  personal  NRI  instructor  is  always  available 
for  consultation  should  you  have  questions  or 
problems.  Over  a  million  students  have  already 
shown  the  effectiveness  of  NRI  training. 

Choice  of  Courses 

Several  courses  are  available,  depending 
upon  your  needs  and  |“  “  —  —  “ 
background.  NRI’s  Master 
Course  in  Computer 
Technology  starts  with 
the  fundamentals,  ex¬ 
plores  basic  electronics 
and  digital  theory,  the 
total  computer  world, 
and  the  microcomputer. 

The  Advanced  Course, 
for  students  already 
versed  in  electronics 
and  general  comput¬ 
ers,  concentrates  on  the 
microprocessor  and  mic¬ 
rocomputer.  In  both 
courses,  you  build  all 
instruments  and  your 
own  computer. 


Send  for  Free  Catalog. . . 

No  Salesman  Will  Call 

Get  the  details  on  these  exciting  new 
courses  in  NRI’s  free,  100-page  catalog.  Shows 
all  kits  and  equipment,  lesson  outlines,  and  full 
information,  including  facts  on  other  electronics 
courses.  Mail  the  coupon  today  and  we’ll  rush 
your  catalog.  No  salesman  will  ever  call.  Keep  up 
with  the  latest  technology  as  you  learn  on  your 
own  computer.  If  coupon  has  been  removed, 
write  to  NRI  Schools,  Computer  Department, 
3939  Wisconsin  Ave.,  Washington,  D.C.  20016. 


NRI  Schools 

McGraw-Hill  Continuing 
Education  Center 
3939  Wisconsin  Avenue 
Washington,  D.C.  20016 

NO  SALESMAN  WILL  CALL 

Please  check  for  one  free  catalog  only. 

□  Computer  Electronics  Including 
Microcomputers 

□  TV/Audio/Video  Systems  Servicing 

□  Complete  Communications  Electronics 
with  CB  •  FCC  Licenses  •  Aircraft, 

Mobile,  Marine  Electronics 

□  CB  Specialists  Course 

□  Amateur  Radio  •  Basic  and  Advanced 


7vUrtrtm*- 


All  career  courses 
approved  under  GI  Bill. 
□  Check  for  details. 


□  Digital  Electronics  •  Electronic 
"technology  •  Basic  Electronics 

□  Small  Engine  Repair 

□  Electrical  Appliance  Servicing 

□  Automotive  Mechanics 

□  Auto  Air  Conditioning 

□  Air  Conditioning,  Refrigeration,  &  Heating 
Including  Solar  "technology 


Name 

(Please  Print) 

Age 

Street 

City/State/Zip 

Accredited  by  the  Accrediting  Commission  of  the  National  Home  Study  Council 


173-010 


FUTURE  COMPUTING 


Robots  With  Human  Skills? 


The  future  development  of  computer 
technology  hints  at  achieving  artificial, 
human-like  intelligence  of  unbeliev¬ 
able  power.  Perhaps  some  men  and 
women  living  today  will  be  around  to 
experience  a  future  shock  when  they 
are  confronted  by  intelligent  computer 
systems  with  artificial  human  voices 
and  acute  hearing  mechanisms.  These 
systems,  they  will  discover,  outper¬ 
form  their  own  human  skills  in  areas  of 
professional  endeavors.  In  other  words 
it’s  like  the  industrial  revolution.  Elec¬ 
tromechanical  devices  outperformed 
feats  of  common  human  labor  then,  and 
caused  whole  categories  of  human  oc¬ 
cupational  skills  to  disappear.  Com¬ 
puters  are  destined  to  affect  us  in  the 
same  way. 

With  the  coming  “mind-in-the- 
machine”  revolution  I  predict  that  cer¬ 
tain  white-collar  and  some  profes¬ 
sional-level  jobs  will  disappear  within 
one  generation.  Before  discussing 
these  jobs,  consider,  as  an  argument, 
an  accepted  test  for  artificial 
intelligence. 

The  test  was  conceived  by  A.M. 
Turing.  According  to  Prof.  Turing  a 
computer  is  judged  to  be  intelligent 
when  you  place  a  man  at  a  terminal  and 
ask  him  to  communicate  through  the 
keyboard  and  CRT  screen  with  whom¬ 
ever  or  whatever  is  at  the  other  end  of 
the  line.  The  man  at  the  terminal  must 
decide  whether  there  is  a  human  at  the 
other  end  of  the  communication  link  or 
whether  he  is  communicating  with  a 
computer.  If  the  man  at  the  terminal 
can’t  make  such  a  decision  and  if,  in 
fact,  he  is  communicating  with  a  com¬ 
puter  then  that  is  artificial  intelligence, 
said  Dr.  Turing.  Common  sense  sug¬ 
gests  that  the  Turing  test  is  correct. 

To  repeat:  when  you  can’t  be  sure 
whether  you  are  communicating  with  a 
human  or  with  a  computer  —  then  you 
are  in  the  realm  of  artificial  intelli¬ 
gence.  Has  this  experience  ever  hap¬ 
pened?  Yes!  There  are  already  docu¬ 
mented  cases  of  respected  individuals 
who  believe  there  is  a  group  of  people 
(“traffic  controllers”,  if  you  will)  who 
are  intervening  in  interactive  comput¬ 
ing  environments  and  are  directing 
other  people  using  the  systems.  There 
are  even  some  cases  of  people  who 


- BY  WILLIAM  R.  PARKS - 

want  to  develop  “private”  inter¬ 
personal  relationships  with  sophisti¬ 
cated  “conversational”  programs  in¬ 
volving  psychoanalysis.  Imagine  that!! 
Some  people  have  been  fooled  into 
thinking  that  there  is  an  emerging  con¬ 
sciousness  latent  in  some  complicated 
or  large  scale  computer  systems. 

Such  a  condition  is  not  possible. 
However,  we  can  see  a  natural  develop¬ 
ment  in  artificial  intelligence  that  will 
eventually  produce  highly  sophisti¬ 
cated  programs.  These  would  be  so 
complex  and  comprehesive  that  robot¬ 
like  creatures  might  evolve  that  could 
act  like  humans,  think  like  humans,  and 
even  show  emotions  like  humans.  But 
these  artificial  creatures  will  never  be 
conscious  of  what  they  are  doing.  We, 
on  the  other  hand,  will  be  conscious  of 
their  actions  and  we  might  even  attrib¬ 
ute  consciousness  to  them  because  of 
their  great  intelligent  powers.  How¬ 
ever,  this  will  be  an  obviously  dan¬ 
gerous  situation.  It  will  be  far  healthier 
and  safer  to  view  artificially-intelligent 
machines  as  responding  to  programs 
input  by  humans.  In  other  words,  you 
will  have  to  judge  the  experience  with 
the  same  feeling  you  have  when  view¬ 
ing  the  painting  of  a  great  master. 
Somehow  you  feel  close  to  the  painter 
—  even  if  he  had  lived  in  a  past  era. 

I  like  the  analogy  of  cartoons.  We 
attribute  human-like  traits  to  animals. 
This  is  a  good  mental  exercise.  Also, 
very  entertaining.  Never  once  do  we 
seriously  consider  Bugs  Bunny  or 
Mickey  Mouse  to  be  living  entities  — 
unless  we  are  very  young  children.  In 
like  manner,  we  can  program  compu¬ 
ters  to  be  highly  personal  machines  that 
appear  to  be  human  and  conscious. 
Another  analogy  is  in  the  reading  of  a 
letter  from  a  person  we  love  or  know 
very  well.  As  we  read  the  letter,  we 
sometimes  sense  that  the  person  is  in 
our  presence. 

For  these  reasons,  I  think  it  is  impor¬ 
tant  to  know  the  names  of  program¬ 
mers.  It  is  with  them  that  we  communi¬ 
cate  when  we  engage  in  interactive 
computerized  conversations.  The  most 
intricate  and  exciting  letters  one  re¬ 
ceives  are  really  good  programs  written 
by  human  beings.  It  is  their  con¬ 
sciousness  that  we  experience  and  not 


the  computer’s. 

Needless  to  say,  future  evil  forces 
could  produce  highly  sophisticated 
computer  systems  that  would  use  prin¬ 
ciples  of  artificial  intelligence  to  con¬ 
trol  conscious  human  beings.  The 
humans 'would  be  influenced  by  un¬ 
conscious  but  highly  intelligent  robot- 
computers.  In  order  to  effectively  de¬ 
fend  against  such  evil  powers  we  could 
develop  equally  sophisticated  but  in¬ 
telligent  good  robot  computers.  Does 
this  sound  like  science  fiction?  Good 
and  bad  artificial  intelligences? 

In  summary,  we  can  conclude  that  of 
all  the  areas  of  computer  technology, 
artificial  intelligence  is  the  most  power¬ 
ful!  It  is  bound  to  have  the  greatest 
impact  on  man.  That  leads  us  to  define 
the  areas  in  which  artificial  intelligence 
can  imitate  man’s  intelligence,  perhaps 
even  exceeed  man’s  ability. 

I  think  that  the  following  occupa¬ 
tions  will  be  enhanced  by  artificial  in¬ 
telligence:  programmer,  teacher, 

medical  doctor,  clergyman,  nurse, 
social  worker,  policeman,  and  any 
other  similar  occupations  that  require 
human  interactions.  These  occupations 
are  safe  even  in  the  coming  world  of 
robots.  However,  much  of  the  labor 
itself  done  by  these  workers  will  be 
computerized!  Occupations  not  di¬ 
rectly  related  to  socializing  and  con¬ 
versations  with  people  will  be  phased 
out.  Robots  can  handle  situations  or 
activities  that  do  not  involve  socializing 
such  as:  assembly- work  in  factories, 
repair  of  machines,  certain  categories 
of  technicians,  work  in  unhealthy  en¬ 
vironments.  (Let’s  send  robots  into 
coal  mines  or  in  certain  potentially 
dangerous  chemical  factories  )• 

With  artificial  intelligence  maturing 
as  a  well  established  field,  perhaps,  we 
might  see  unusual  results.  Most  legal 
work,  for  example,  will  be  done  by 
computers  and  this  will  require  the  need 
for  computer-oriented  lawyers.  This 
possibility  could  greatly  reduce  the 
need  for  training  the  many  text-book 
lawyers  that  we  do  today.  Other  well- 
established  professions  could  similarly 
be  diminished  in  numbers.  Teacher 
aides,  bookkeepers,  bank  tellers,  and 
others  would  be  greatly  reduced  by 
computerization  of  their  job  functions. 


tipple 

computer 

Apple  li  Reference  Manual  $10.00 

Apple  Soft  Manual  10.00 

Programmer  s  Guide  (Computer  Station)  5.95 

Apple  li  Monitor  Peeled  9.95 

Software  Directory  for  Apple 

•  Business,  Finance  &  utility  4.95 

•  Carnes,  Demo,  Utility  4  95 

Best  of  Contact  78  2.50 

Programming  In  PASCAL  (Crogono)  9.90 


High  Resolution  light  Pen  199  00 

Mlcromobem  (D  C  Hayes)  579  00 

12  B  w  leebex  Monitor  149  00 

Cable  from  Monitor  to  Apple  ii  9  95 

1 5  Color  tv  Compatible  with 
Apple  II  290  00 

Sup  R  Modulator  (RF)  25  00 

SOFTWARE  FOR  APPLE  II 

PASCAL  from  Programme  49  95 

FORTH  49  95 

LlSP-from  Apple  Software  Bk  no  5  N  C 

USA-interactive  disk  assembler  54  95 

WHATSIT— Excellent  conversational  data 
base  manager  52k  100  00  48k  125  00 

SARCON  Champ  of  2nd  West  coast 
Computer  Faire  19  95 

APPLE  pie— Excellent  text  editor  24  95 

forte-music  editor  in  hires  19  95 

fastgammon— Excellent  backgammon 
game  with  graphics  Tape  20  00  Disk  25  00 
apple  21— Excellent  blackjack  game  9  95 

BRIDGE  CHALLENGER— Computer  bridge  1 4  95 

financial  management  system 

•  Accounts  Payable  •  Ledger  Processing 

•  Accounts  Receivable  •  Payroll 

•  inventory  Control  •  $800  Complete 

•  $10  for  Manual 


•  $200  Each  Package 


INTERFACE  CAROS 

Prototyping  Hobby  Card 
Parallel  Printer  interface  card 
Communications  Card  &  DB25 
Connector  cable 
High  Speed  Serial  interface  Card 
Language  System  with  Pascal 
(48k  RAM  &  Disk  it  Required) 
Applesoft  il  Firmware  Card 
16  input  Analog  Card 


495  00 
200  00 
295  00 


ACCESSORIES 

Disk  II— Drive  Only  495  00 

Disk  II— Drive  &  Controller  (52k  Min 
RAM  Recommended)  595  00 

vinyl  Carrying  Case  50  00 

Tape  Recorder  40  00 

Programmers  Aid  No  i  Firmware  (For 
use  with  integer  basic)  50  00 

Clock  Calendar  Card  199  00 

Auto— Start  ROM  Package  (For 
Apple  II  Only)  65  00 

oigikitizer  Pad  by  Taios 
<Kitform>  499  00 


PRINTER  SPECIALS  FOR  APPLE  AND  PET 

TRENDCOM  100  with  interface  for 
Apple  or  PET  450  00 


LITE  PEN  used  with  tv  or  monitor 
screen  S4  95 

alf  Music  Synthesizer  Boards  265  00 

Supertalker  279  00 

Anadex  dp-8000  with  trader 
8  paper  width  and  Interface 
to  Apple  1050  00 

Centronics  779  2  for  Apple  li 
with  parallel  interface  1 245  00 

software  (Send  for  complete  software 
Catalog  $1.00) 

oow  Jones  Portfolio  Evaluator 
Stock  Ouote  Reporter  Disk  50  00 

Mlcrocness  2  0  Chess  Disk  25  00 

Disk  utility  Pack  with  DOS  5  2  25  00 

The  Controller  (General  Business 
System)  625  00 

Apple  Post  (Mailing  List  System)  49  95 

Bowling  Program  Diskette  1 5  00 

The  Cashier  (Retail  Store  Management  250  00 
Checkbook  Cassette  20  00 

Applesoft  n  Language  &  Demo 
cassette  20  00 

ram  Test  Tape  with  Manual  7  50 

Finance  1  2  Cassette  Package  25  00 

oatamover  Teiepong  cassette 
(Com  Card  &  Modem  Req  d)  7  50 

Microchess  2  0  Chess  Tape  20  00 

Bowling  Program  Tape  15  00 

Pascal  with  Language  System 
(48k  ram  &  Disk  li  Required)  495  00 


New  for  Apple  Computer  Owners 
at  Low  ComputerWorld  Prices 


8"  Disk  Drives  with  housing  $1295.00  for  single  drive  $1895.00  for  dual  drive 


A  PROFESSIONAL 
BUSINESS  SYSTEM 


kt  „„ ,  ,y 


C* 


commodore 


CMB  2022 
$995 


CBM 


TM 


2001-8  $795 

2001-16N  $995 

2001-32N  $1295 

2001-32B  $1295 

External 

cassette  $95 

PET  to  IEEE 
Cable  $39.95 


CBM  2023 

Printer  $849 

IEEE  to  IEEE 
Cable  $49.95 


CBM  2040 
$1295 


Join  Now 


fgcippkz  computer 

Joystick  for  Apple  II  Only  $39.95  i 
ComputerWorld’s  Complete  Library  of 
600  Apple  II  programs  Only  $60.00 


PET 


2001 -16B 
$995 


Commodore  PET  service  Kit  $30.00 

Beeper— Tells  when  tape  is  Loaded  24.95 

Petunia— Play  music  with  pet  29.95 

video  Buffer— Attach  another  display  29.95 

Combo— Petunia  and  video  Buffer  49  95 

SOFTWARE  FOR  PET 


Mirrors  and  Lenses  19.95 

The  states  14.95 

Real  Estate  1  &  2  59.95 

Momentum  and  Energy  19.95 

Projectile  Motion  19.95 

Mortgage  14.95 

Dow  Jones .  7.95 

Petunia  Player  Sftwr  14.95 


Checkers  and  Baccarat  7.95 
Chess  19.95 

Series  and  Parallel 
Circuit  Analysis  19.95 

Home  Accounting  9.95 

BASIC  Math  29.95 

Came  Playing  with  BASIC 
vol.1,11,  III  9.95  each 


Become  a  member  of  ComputerWorld’s  RAYGAMCO  Computer  Discount  Club. 


By  being  a  RAYGAMCO  Member  you  receive  substantial  discounts  on  every  item  you 
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For  the  “Plug-In” 
Professional 


We  don’t  tell  you  how  to  build  a  computer. 

We  don’t  tell  you  how  to  test  it  or  repair  it. 

We  don’t  even  tell  you  how  it  works. 

But  we  do  show  you  how  to  use  com¬ 
puters  to  make  money,  save  time  and 
have  fun  at  your  business,  office, 
school  and  home.  Each  month,  our 
informative,  easy-to-read  articles  bring 
you  ready-to-use  application  programs; 
just  type  them  in  and  tell  your  computer  to 
RUN. 

In  addition,  we  feature  tutorial  articles 
showing  you  how  to  plan  and  write  your 
own  programs,  using  professional  methods 
and  the  latest  programming  techniques. 

Each  monthly  issue  also  includes  new 
products,  computer  chess,  bridge  and  other 
sophisticated  games,  and  news  and  happenings 
in  the  microcomputing  world. 

If  you’re  a  “plug-in”  professional  interested 
in  using  computers  in  your  daily  life,  we’ll  show  you 
how.  Use  this  coupon  to  order  your  subscription  today. 
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Now  You  Don’t 
Have  to  Wait 
for  the  Best 

It’s  new.  And  it’s  a  book  that  every 
microcomputerist  should  have.  It’s 
Volume  I  of  The  Best  of  Personal 
Computing. 

Comprehensive  check  writing  and 
accounting,  stock  market  analysis, 
inventory  control  and  vacation  plan¬ 
ning  are  only  a  few  of  the  valuable 
computer  programs  contained  within. 

These  programs,  collected  from  two 
years  of  Personal  Computing  maga¬ 
zine,  will  run  on  most  popular 
microcomputer  systems. 

Just  using  one  computer  program 
could  easily  be  worth  more  than  the 
$7.50  purchase  price  of  the  softcover 
8-1/2"  x  1 1"  book  of  196  pages. 

Some  of  the  other  programs  well 
received  over  the  last  two  years  and 
reprinted  here  include:  Investment 
Analysis  to  help  decide  highest  profit 
potential,  Contract  Labor  Cost 
Accounting,  Calculation  of  Seasonal 
Indices,  Computerized  Phone  Direc¬ 
tory,  Use  of  Sensing  and  Control 
Devices  in  the  Automated  House, 
Personal  Budget  Control  and  Automat¬ 
ic  Data  and  Appointment  Reminder. 

Programming  students  will  find  the 
program  listings  (mostly  in  popular 
BASIC  programming  language)  an 
important  aid  to  understanding  and 
learning  more  about  practical  computer 
programming. 

In  total  there  are  more  than  20 
applications  with  30  program  listings: 
10  are  applicable  to  both  business  and 
home  use,  17  to  business  use,  and  5 
directly  to  home  use. 

One  special  feature  of  the  book  is  the 
article  “Small  Business  Systems:  To 
Buy  or  Not  to  Buy”,  which  takes  the 
reader  step  by  step  through  the  ques¬ 
tions  he  should  ask  himself,  manufac¬ 
turers  and  retailers  before  buying  a 
computer  system. 

The  Best  of  Personal  Computing 
Volume  I,  is  available  for  $7.50 
(postage  included)  from  Personal 
Computing,  Box  AD,  1050  Common¬ 
wealth  Ave.,  Boston,  MA  02215. 
Payment  must  accompany  your  order. 

Treat  yourself  or  a  friend  to  a  gift 
that  will  be  appreciated  for  its  use¬ 
fulness  —  The  Best  of  Personal 
Computing. 
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F  orecasting 


T3  etail  businesses  face  a  classical 
^^forecasting  problem  involving  in¬ 
ventory  control.  For  example,  how 
many  units  of  merchandise  should  be 
on  order  to  replace  the  quantity  sold 
without  being  overstocked?  Or,  how 
can  a  retailer  avoid  the  loss  of  business 
incurred  when  stock  becomes  ex¬ 
hausted?  The  problem  can  become  a 
nightmare  if  the  controlling  influence 
behind  volume  of  sales  is  not  known  or 
is  improperly  understood.  Reliance 
must  be  placed  on  a  forecasting  system 
based  on  prior  experience. 

In  forecasting,  we  take  a  series  of 
numbers  and  guess  what  number  will 
occur  next  in  sequence.  Later,  we’ll 
know  what  that  next  number  really  was 
and  then  guess  the  next  one,  using  the 
experience  gained  in  guessing  the  pre¬ 
vious  one  and  profiting  by  our 
mistakes. 

Anyone  can  produce  a  forecast  given 
sufficient  information  and  the  time  to 
study  it.  But  the  task  is  simplified  with 
the  use  of  a  computer. 

The  routine  forecasting  centers  on 
“playing  the  averages”  as  best  we  can. 
Suppose,  for  example,  we  are  given  a 
series  of  five  numbers:  180,  300, 
360,  340,  220.  What  could  we  reason¬ 
ably  expect  the  next  one  to  be?  We 
might  as  well  guess  at  the  average  value 
of  the  five  numbers  given  —  280. 
Then,  if  the  number  really  turns  out  to 
be  160,  the  question  arises,  “Could  we 
expect  to  do  any  better  on  the  next  try?” 
We  might,  alternatively,  use  the 
average  of  the  three  most  recent  num¬ 
bers  (307).  We  could  even  adjust  future 
forecasts  on  the  basis  of  the  error 
between  the  previous  number  forecast 
and  the  actual  number  reported. 

The  first  two  methods  of  forecasting 
are  fairly  conventional:  the  former  is  a 
simple  average,  the  latter  a  moving 
average.  The  third  method  branches  out 
in  a  different  direction  because  it  recog¬ 
nizes  the  possibility  that  a  forecast  de¬ 
pends  both  on  the  influence  of  an  aver¬ 
age  taken  from  prior  experience,  plus 
an  additional  factor  that  is  the  amount 
by  which  the  actual  number  differed 
from  the  forecast. 
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A  serious  disadvantage  to  using  a 
simple  average  is  the  fact  that  equal 
weight  is  given  to  all  data.  We  would 
prefer  to  emphasize  the  effect  of  recent 
data  but  not  necessarily  to  the  exclusion 
of  prior  experience.  A  well-established 
technique  for  achieving  this  means  of 
forecasting  is  known  as  “smoothing”, 
where  short-term  trends  are  recognized 
and  weighed  with  the  effect  of  longer- 
term  experience.  • 

But  suppose  that  in  the  record¬ 
checking  process  we  only  had  access  to 
the  most  recent  forecast;  now,  when  the 
“actual”  figure  is  announced  and  rec¬ 
orded  we  have  only  these  two  figures  to 
work  with.  We  probably  don’t  feel  very 
comfortable  preparing  a  forecast  for  the 
next  period,  but  here  is  what  we  might 
do  to  make  an  estimate. 

It  seems  logical  that,  if  the  “actual” 
figure  turned  out  to  be  higher  than  fore¬ 
cast,  we  should  increase  the  estimate 
for  the  next  period.  Conversely,  if  de¬ 
mand  is  lower  than  estimated,  we 
should  lower  the  next  estimate  relative 
to  the  previous  one.  Furthermore,  if  the 
difference  between  “actual”  and 
“forecast”  is  small,  the  estimate  ad¬ 
justment  should  be  small;  if  larger,  the 
adjustment  should  be  sizeable. 

This  process  leads  to  the  following 
rule:  To  generate  the  new  forecast,  take 
the  previous  estimate  and  add  to  it  a 
fraction  of  the  amount  by  which  the 
“actual”  differed  from  the  prior 
estimate. 

Why  not  add  all  of  the  difference? 
This  would  be  useful  only  if  we  know 
for  certain  that  the  trend  is  toward  a 
continued  rise  (or  a  continued  fall). 
Otherwise,  the  forecaster’s  prime  con¬ 
cern  should  be  to  avoid  large  fluctu¬ 
ations  or  differences  between 
“actuals”  and  “forecasts”.  This  rule  is 
expressed  as: 

(New  Estimate)  =  (Actual -Old  Es¬ 
timate)  x  A  +  (Old  Estimate) 

(where  A  ranges  between  0.0  and  1 .0  at 
the  discretion  of  the  estimator). 

Or,  algebraically: 

(New  Estimate)  =  (Actual)  x  A  + 
(Old  Estimate),  x  ( 1  -  A) 


Using  the  larger  values  of  0.7  —  0.9 
for  A  emphasizes  the  most  recent  expe¬ 
rience  while  smaller  values  (0. 1  -  0.3) 
diminish  the  effect  of  recent  fluc¬ 
tuations. 

Further  consideration  reveals  that 
estimates  computed  by  this  “smooth¬ 
ing”  method  will  lag  behind  even  a 
steadily  rising  (or  falling)  trend.  If  a 
value  can  be  assigned  to  the  trend,  then 
we  can  correct  this  tendency  to  lag  be¬ 
hind  what  seems  to  be  a  steady,  and 
therefore  predictable,  change. 

An  estimate  of  the  trend  is  the  dif¬ 
ference  between  successive  forecasts. 
Here,  a  weighting  factor  similar  to  the 
A  factor  can  be  used  to  correct  the  fore¬ 
cast  derived  from  comparing  the  esti¬ 
mate  and  actual  quantities.  Call  this 
Trend  Factor  “B”,  then  use  it  to  weight 
a  trend  correction  as  follows: 

(New  Trend)  =  (New  Estimate -Old 
Estimate)  x  B  +  (Old Trend)  x  (1-B) 

A  trend  correction  for  the  smoothed 
estimate  derived  above  may  be  com¬ 
bined  with  it  to  produce  a  new  forecast 
thus: 

(New  Forecast)  =  (New  Estimate)  + 
(New  Trend)  x(l—B)/B 

The  computational  simplicity  of 
these  terms  is  very  attractive.  The  next 
set  of  figures  are  calculated  using  only 
estimate  and  trend  from  the  previous 
period  together  with  the  “actual” 
reported  —  a  useful  simplification 
where  record-keeping  is  concerned. 
For  instance,  consider  the  monthly 
inventory-management  task  of  a  ware¬ 
house  carrying  several  thousand  pro¬ 
ducts.  If  each  item  has  a  history  of 
monthly  quantities-on-hand  stretching 
back  over  a  few  years,  the  sheer  volume 
of  the  record  keeping  task  will  repre¬ 
sent  a  significant  part  of  the  business 
cost.  The  data  in  column  1  of  Table  1 
represents  a  series  of  monthly  sales 
figures.  Figures  1  and  2  display  the 
limited  effectiveness  of  simple 
averages  when  used  to  forecast  sales 
figures  over  the  same  periods  using 
data  from  previous  periods.  Figure  3 
displays  the  results  obtained  with  the 
“smoothing  estimate”  and  from  using 
optimized  values  of  the  weighting 
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Table  1 


Month 

Actual  Monthly 
Sales 

Cumulative 

Average 

Three  Month 
Moving  Avg. 

1 

180 

— 

— 

2 

300 

180 

— 

3 

360 

240 

— 

4 

340 

280 

280 

5 

220 

295 

333 

6 

160 

280 

307 

7 

200 

260 

240 

8 

280 

251 

193 

9 

360 

255 

213 

10 

420 

267 

280 

11 

— 

282 

353 

Simulated  sales  data  in  column  1  used  to  derive  estimates  of  future  sales  by  simple 
cumulative  average  of  prior  sales  (col  2)  and  by  a  three-month  moving  average  (col  3);  e.g. 
the  quantity  280  in  period  4  is  derived  from  ( 180+  300+  360)/3. 


Figure  1 
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Graphic  representation  of  data  from  columns  1  &  2  in  Fig.  1.  Prior  estimate  of  the 
expected  sales  volume  using  a  simple  average  of  all  prior  months’  sales. 

It  can  be  seen  that  the  average  becomes  increasingly  insensitive  to  short-term  changes 
due  to  the  sheer  weight  of  all  prior  data. 

Figure  2 
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When  the  average  value  of  the  three  most  recent  months’  sales  are  used  to  estimate  the 
expected  sales  for  the  following  month  it  can  be  seen  that  to  thus  emphasize  the  most 
recent  experience  is  merely  to  echo  a  three-month  old  sales  history  in  the  estimate  of  next 
month’s  sales. 

Figure  3 
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Use  of  the  smoothing  estimate  formula  with  A  set  to  a  value  of  1 .0  and  a  trend  factor  of 
0.45  as  computed  and  optimized  by  the  accompanying  BASIC  program  produced  a 
notable  improvement  in  the  quality  of  forecast. 


factors  A  and  B  derived  from  a  simple 
test  program  accompanying  this  article. 

The  accompanying  BASIC  was  com¬ 
piled  and  executed  on  a  Sperry  Univac 
1108. 

Here  are  a  few  questions  you  may 
ask  before  embarking  on  forecasting 
experiments. 

•  What  are  the  optimum  values  for 
“A”  and  “B”?  Some  trial  and  error  is 
necessary  when  you  set  up  the  system. 
But,  as  previously  mentioned,  the 
larger  values  of  “A”  lead  to  a  more 
responsive  or  “nervous”  system,  as 
will  be  the  case  when  smaller  values  of 
“B”  are  used.  A  simple  set  up  of  nested 
computations  designed  to  test  a  large 
variety  of  combinations  of  “A”and 
“B”  values  can  help  determine  a  best 
fit  before  putting  the  forecasting  pro¬ 
cedure  into  service;  this  was  done  in  the 
attached  program. 

•Should  the  values  be  fixed  once 
and  then  maintained  this  way  in¬ 
definitely?  Not  necessarily,  but  con¬ 
sidering  the  foregoing  reference  to  low 
values  of  “A”  and  the  way  they  reflect 
long-term  influences,  it  will  take  longer 
for  a  system  altered  from  a  higher  to  a 
lower  value  of  “A”  to  adjust  or  settle 
down  after  a  change  than  it  will  with  a 
high  value  of  “A”. 

•  What  values  should  be  used  for 
“old  estimate”  and  “  old  trend”  when 
setting  up  a  new  system?  Use  “actual” 
for  the  initial  value  of  “old  estimate”. 
The  forecast  for  the  second  period  will 
be  the  “actual”  from  the  first,  thus: 

A  X  (actual)  4-  (1-A)  x  (actual)  =  1 
X  (actual)  =  new  estimate. 

This  start-up  problem  will  dissipate 
within  a  few  periods.  Trend  should 
initially  be  set  to  zero  and  the  system 
left  to  compute  new  values  for  itself. 

•  Can  the  procedure  be  used  for 
making  forecasts  for  several  periods? 
Not  really.  Consider  what  values 
should  be  employed  to  represent 
“actuals”  for  future  periods.  The  best 
we  could  do  is  make  them  match  the 
forecasts  for  the  same  periods.  But 
doing  this  means  that  the  principal 
input  to  the  forecasting  equation,  (“A” 
times  the  difference  between  forecast 
and  actual)  would  be  zero.  Then  the 
Trend  would  become  the  dominant 
factor  in  the  succeeding  forecasts  and, 
depending  on  whether  “B”  is  greater  or 
less  then  0.5,  would  determine  whether 
the  system  “runs  away”  or  approaches 
a  constant  value;  either  way  the  fore¬ 
casts  are  not  of  much  use  after  two  or 
three  periods.  Curve-fitting  is  a  better 
prospect  for  long-term  predictions,  but 
that  involves  mathematical  techniques 
beyond  the  scope  of  this  article. 


Program  Notes 

The  accompanying  program,  written 
in  BASIC  on  a  Sperry  Univac  1108, 
expedites  the  determination  of  opti¬ 
mum  values  for  the  weighting  factors  A 
and  B  in  the  smoothing  formula  for  a 
given  set  of  data.  Once  these  values 
are  established,  the  forecasting  pro¬ 
cedure  becomes  a  simple  three-step 


calculation  (as  in  lines  320,  330,  340 
of  the  program)  for  each  new  period 
using  only  the  data  available  from  the 
prior  period. 

Line  230  solicits  up  to  25  items  of 
input  data  for  testing  for  optimum 
values  of  A  and  B;  more  entries  can  be 
accomodated  by  adjustment  of  the  DIM 
statement  in  line  210. 
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Lines  240  to  260  define  initial  values 
of  “old  estimate"  and  of  “old  trend"  to 
allow  a  rational  start  to  computation  of 
the  first  forecast:  S2  is  a  sum-of-the- 
least-squares  quantity  used  to  compare 
the  quality  of  fit  of  various  forecast 
curves  tested  during  the  optimizing 
exercise.  The  initial  value  set  is 
suitably  large  to  ensure  that  the  first 
value  computed  is  accepted  for  com¬ 
parison  with  subsequent  values  when 
A  and  B  are  varied  in  the  FOR  loop 
(lines  270  to  460). 

In  line  300,  the  quantity  NUM  is  a 
feature  of  Univac  1100  BASIC  that 
automatically  stores  the  number  of  data 
items  entered  in  a  MAT  INPUT  state¬ 
ment  for  the  purpose  of  parameterizing 
subsequent  operations  involving  the 
related  MATrix.  A  simple  counter  can 
be  devised  to  replace  this  capability  if 
not  otherwise  provided. 

The  output  PRINT  statements  are 
purposely  written  in  an  elementary 
form  to  avoid  conflict  with  differing 
protocols  under  differing  versions  of 
BASIC.  For  example,  the  rounding 
algorithm  INT(N*100+0.5)/100  looks 


cumbersome  when  compared  with  the 
various  PRINT  USING  statements  of 
most  processors,  since  the  latter  usually 
provide  built-in  rounding.  But,  either 
way,  the  intent  is  to  overcome  the  prob¬ 
lem  inherent  in  displaying  decimal 
fractions  of  differing  length  that  con¬ 
fuse  the  appearance  of  tables;  for  ex¬ 
ample,  0.4499998  as  opposed  to  0.45. 

The  MATrix  function  used  in  the 
program  is  a  sophisticated  operator. 
But  the  use  of  the  function  in  this  ex¬ 
ample  is  simply  for  storage  of  input 
data  and  derived  lists  of  Trend  and 
Forecast  calculations.  None  of  the 
elegant  and  powerful  operations  of 
matrix  algebra  are  employed  by  the 
program. 

Most  BASIC  processors  support 
some  form  of  storage  wherein  the 
elements  may  be  referenced  by  an 
index  mechanism  such  as  a  FOR  loop 
or  a  counter.  Such  a  collection  of  stor¬ 
age  cells  may  be  known  as  a  matrix,  an 
array  or  even  as  a  vector,  which  is  a 
single-dimensioned  version  of  an 
array.  Here  we  are,  using  vectors  to 
store  our  lists  of  numbers:  Vector  D  is 


the  list  of  input  data  items  that  is  proc¬ 
essed  to  yield  a  list  of  related  estimates, 
Vector  C,  with  which  the  Trend  calcu¬ 
lations,  Vector  T,  are  combined  to 
yield  a  reworked  Vector  C  that  is  the  list 
of  Estimates  we  are  seeking  in  the  exer¬ 
cise.  Lines  430,  440  in  the  program 
make  exact  copies  of  the  Vectors  C  and 
T  if  the  test  conducted  in  line  390  is 
satisfied. 

Line  210  may  need  modification  to 
properly  define  the  size  of  the  five 
Vectors  to  suit  the  protocol  of  your 
particular  BASIC.  Line  230  might  then 
be  replaced  with  a  simple  input  routine 
that  assigns  storage  for  up  to  25  input 
data  quantities  and  counts  the  actual 
number  submitted  (for  later  use  as  an 
index  limit  for  operations  carried  out  on 
the  data).  Lines  300,  360, 500  and  550 
will  also  need  to  be  modified,  using  the 
same  index  in  place  of  the  NUM 
quantity  that  is  otherwise  used  to  count 
the  input  items.  Finally,  lines  430  and 
440  must  be  replaced  with  a  small 
routine  that  loads  a  copy  of  Vector  C 
into  Vector  Z  and  a  copy  of  Vector  T 
into  Vector  Y.  □ 


Program  Listing 


00100 

00110 

00120 

00130 

00140 

00150 

00160 

00170 

00180 

00190 

002CO 

00210 

00220 

00230 
00240 
00250 
00260 
00270 
0J280 
00290 
0030  1 
00310 
00320 
0J3  50 
00340 
00350 
003o0 
0  J370 
00380 
03390 
00400 
00410 
00420 
0  J  430 
00440 
00450 
00460 
0  J470 


REM  FORECASTING  PROGRAM  THAT  WILL  TAKE 
REM  UP  TO  25  INPUT  DATA  ITEMS  AT  RUN 
REM  TIME  AND  GENERATE  A  FORECAST  FOR  THE 
REM  NEXT  PERIOD.  EXPONENTIAL  SMOOTHING  WITH 
REM  TREND  COMPENSATION  IS  VARIED  OVER  THE 
REM  RANGE  OF  0  -  1.0  IN  STEPS  OF  0.05  AND 
REM  THE  BEST  FIT  DECIDED  ON  BASIS  OF  SUM- 
REM  OF  THE  SQUARES  FIT 
REM 

REM  PROGRAMMER  TICKELL  JULY  25  1979 
REM 

DIM  D(25) *C (25) *T(25) *7(25) * Y(25) 

PRINT* INPUT  HISTORIC  DATA,  EARLIEST 
FIRST  (D1 *U2* • • .DN) * 

MAT  INPUT  D 
C ( 1 ) =D ( 1 ) 

T(1)=0 
S2=10E10 

FOR  B=0.05  TO  t  STEP  .05 
FOR  A=0.05  TO  1  STEP  .05 
S=0 

FOR  1=1  TO  NUM 
N=I*1 

C(N)sD(I)*A+C(I)*(l-A) 

T(N)=(C (Nl-C (I ) )*B+T( I )*( 1-B) 
C(N)=C(N)+T(N)*(l-B)/b 
NEXT  I 

FOR  L=1  TO  NUM 
S=S-MD(L)-C(L) 1**2 
NEXT  L 

IF  S2-SC0  THEN  450 
S2=S 
A1=A 
Bl=b 
MAT  7=C 
MAT  Y=T 
NEXT  A 
NEXT  B 
PRINT 


0°48Q  PRINT  ’PERIOD*  * ’ACTUAL  *  * * FuRECAST*  *  *  TREND* 

00490  PRINT 

0050?  FOR  J=1  TO  NUM 

00510  Z(J)=INT(  <7.(  J)  *10+0.51/10) 

00520  Y ( J ) =INT ( (Y (J)*10-fcQ.5)/10) 

00530  PRINT  J*D< J) *Z( J) *Y( J) 

00540  NEXT  J 

00550  X=NUM*1 

00560  PRINT  X  I  TAB { 30 ) I 

00570  PRINT  INT(7(X)*10*0. 51/10* 

00580  PRINT  INT(Y(X)*10+0. 51/10 
00590  PRINT 

0060 j  PRINT  *  ALPHAS* »INT(Al*100+0.5)/10J» 

00610  PRINT  •  BFTA=* » INT ( Bl*100+0 . 51/1001 
00620  PRINT  *  SUMSQ  st|iNT(S2) 

00630  END 


Sample  Run 


INPUT  HISTORIC 

DATA*  EARLIEST 

FIRST  <D1*D2* 

...DN) 

?  180*300* 360  * 

340*220*160*200 

*280*360*420 

PERIOD 

ACTUAL 

FORECAST 

TREND 

1 

180 

180 

0 

2 

300 

180 

0 

3 

360 

36e> 

54 

4 

340 

393 

27 

5 

220 

329 

-9 

6 

160 

154 

-54 

7 

200 

127 

-27 

8 

280 

222 

18 

9 

360 

324 

36 

10 

420 

404 

36 

11 

453 

27 
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Linear 
Regressions 
for  Small 
Businesses 

- BY  MIKE  DE  SANTIS - 


Almost  every  facet  of  business,  from  predicting  the 
Gross  National  Product  to  determining  how  much  a 
theater  should  charge  to  show  a  movie,  utilizes  linear  regres¬ 
sion.  Even  though  regressions  are  mathematically  compli¬ 
cated,  they’re  well  worth  the  trouble  to  use  —  especially 
when  your  computer  does  the  number-crunching. 

Regressions  mathematically  mold  data  to  form  a  model  of 
a  situation.  A  simple  example  would  be  the  price  history  of  a 
stock.  By  plugging  data  into  the  regression  program  you  can 
determine  what  to  expect  the  stock’s  price  to  be  next  year, 
thereby  enabling  you  to  decide  whether  to  purchase  the 
security.  While  regressions  are  usually  more  complicated1 
than  the  example,  often  involving  hundreds  of  variables  and 
thousands  of  data  points,  let’s  look  at  the  technique’s  use  for 
small  businessmen  and  students,  whose  needs  are  not  so 
taxing. 

The  popularity  of  regressions  goes  hand-in-hand  with  the 
rise  of  computers.  The  complicated  routines  involved  in 
performing  regressions  made  hand  calculations  Herculean 
labors.  Thus,  only  with  the  advent  of  computers  did  regres¬ 
sions  become  physically  possible  and  economically  feasible. 

If  you  haven’t  already,  look  at  the  Program  Listing.  In  the 
107  lines  of  code,  all  the  computer  is  doing  is  trying  to  fit  a 
straight  line  like  Y  =  AX  +  B  through  a  set  of  data  points  (Y 
is  the  dependent  variable,  X  the  independent  variable,  A  the 
estimator  or  slope,  and  B  the  constant  term  or  intercept).  The 
beauty  of  such  a  curve  fitting  procedure  is  that  a  good 
regression  will  give  you  a  mathematical  model  on  which  to 
base  business  decisions. 

Let’s  look  at  a  concrete  (but  simple)  example. 

You  serve  as  a  part-time  appraiser  in  your  community. 
You’ve  examined  six  lots  of  different  frontages  and  values, 
and  wish  to  make  a  model  of  this  situation.  The  data  is: 


Value 

Frontage 

(Dependent  Variable/Y) 

(Independent  Variable/X) 

1 1 ,000  dollars 

75.2  feet 

8,800  " 

58.0  " 

12,200  " 

81.0  " 

11,100  " 

69.0  " 

10,500  " 

72.0  " 

13,000  " 

85.0  * 

Putting  this  data  into  the  program  will  give: 

Y  =  357.58  +  146.42  X 

You  now  have  a  mathematical  model  for  the  situation.  If 
you  wish  to  know  the  value  of  a  lot  with  1 10  feet  of  frontage, 
substitute  1 10  for  X  and  find  the  answer  ($16,463.89). 

One  of  the  nice  things  about  regressions  is  flexibility.  We 
could  expand  our  model  to  include  not  only  frontage  but  lot 
area  (if  the  lots  have  different  depths),  distance  from  the 
center  of  town,  tax  rate  and  a  host  of  other  factors  as  well. 
Regressions  such  as  these  tend  toward  being  an  art  form, 
allowing  you  the  freedom  to  expand  your  model  in  any  way 
you  choose. 

You  may  enter  extra  variables  and  data  points  to  your 
heart’s  content,  with  one  small  catch:  You  must  have  one  set 
of  data  points  more  than  the  number  of  variables  for  the 
program  to  work.  That  is,  you  can  have  100  independent 
variables  but  you  must  have  at  least  101  sets  of  observations. 

Of  course,  you  can  also  run  into  trouble.  By  adding  or 
deleting  variables,  you  change  the  structure  of  the  model;  not 
only  will  the  coefficients  change  but  the  accuracy  of  those 
estimators  as  well. (We’ll  see  an  example  at  the  end  of  the 
article.) 

To  find  the  accuracy  of  the  answers,  statisticians  use  the 
“t-test.” 

The  t-statistic  is  simply  the  coefficient  (that  is,  the  answer 
listed  under  the  “Value”  column)  divided  by  the  standard 
error  of  that  answer.  In  general,  a  t  value  greater  than  two 
means  the  result  is  very  good.  If  it  is  below  two  by  a 
significant  amount  (say  it  is  1 .7),  you  might  want  to  discard 
that  variable  from  your  model.  Simply  re-run  the  regression 
without  that  variable. 

Two  more  statistics  are  helpful  in  judging  results:  the 
F-statistic  and  the  R-squared  value. 

The  F-statistic  indicates  how  good  the  model  is  as  a  whole. 
Thus,  while  the  t-test  will  indicate  how  good  an  individual 
variable  performs  in  the  model,  the  F-test  tells  how  good  a 
relationship  exists  between  your  dependent  variable  (Y),  and 
all  the  independent  variables  (the  Xs).  Here,  the  rule  of 
thumb  is  5.  If  the  F  value  is  above  5,  you’re  OK.  But  if  it  is 
much  below  5 ,  you  should  scrap  your  model  and  try  some¬ 
thing  else. 

The  R-squared  value  is  related  to  the  F-statistic  but  tells  a 
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slightly  different  story;  it  indicates  in  percentage  terms,  how 
much  of  the  variation  among  the  data  points  the  model 
explains.  An  R-squared  of  .92  means  92%  of  the  variation  is 
explained.  Don’t  let  a  poor  R2  throw  you  off  the  track; 
different  types  of  data  yield  different  ranges  of  R-squared.  A 
stock  market  model  with  a  value  of  .60  is  considered  quite 
good  because  it  is  believed  price  fluctuations  are  due  to 
psychological  factors  not  readily  quantifiable.  A  model  of 
expected  sales  of  an  established  product  as  a  function  of  its 
price  would  probably  require  a  R2  considerably  higher  before 
it  should  be  used. 

I  am  only  touching  the  surface  here  so  experiment  with  the 
program.  I’m  sure  you  will  find  things  that  make  your  busi¬ 
ness  life  quite  a  bit  easier. 

Now,  about  the  program  itself. 

I  had  difficulty  devising  this  program  because  of  the  rela¬ 
tive  complexity  of  the  problem.  For  those  of  you  with  some 
math.  I’ll  describe  the  formulas  used.  If  you  don’t  under¬ 
stand,  skip  the  material. 

We  have  two  matrices  of  data:  Y,  containing  the  depen¬ 
dent  variables;  and  X  (or  in  the  program,  the  Ws),  containing 
the  independent  variables.  In  matrix  representation,  the  es¬ 
timators  of  the  regression  coefficients  (B)  are  determined  by 
B  =  (X'Xr'X'Y 

where  primes  indicate  transposition  and  —1  means  inverse. 
Thus,  we  have  the  problem  of  inverting  a  matrix.  For  this  I 
took  advantage  of  the  relationship 

X"1  =  (1/DET(X))*  ADJ(X) 

(DET  =  determinant,  ADJ  =  adjoint). 

This  equation  simplified  matters  because  I  already  had  a 
routine  that  took  the  determinant  of  a  matrix.  The  routine 
transforms  the  matrix  into  an  upper-diagonal  matrix  and  the 
determinant  is  the  product  of  the  diagonal  elements. 

There  is  one  command  in  the  program  that  probably  won’t 
be  available  on  your  machine:  NUM$  (line  6400).  The  com¬ 
mand  transforms  a  number  into  a  character  string.  For  sys¬ 
tems  without  the  same  or  a  similar  command,  delete  line 
6400  and  replace  T$(I)  in  line  6500  by  I.  Just  remember  that 
your  “  1  ”  will  correspond  to  my  “CONSTANT”. 

Line  numbers  100  through  3000  set  up  the  matrices  for  the 
regression  proper,  which  is  calculated  between  3100  and 
6000.  The  rest  of  the  program  contains  both  the  subroutine 
that  inverts  the  matrix  and  the  commands  to  print  the  results. 
“CONSTANT”  denotes  that  term  in  the  model  which  I  called 
“intercept”  in  my  explanation.  The  other  “values”  are 
numbered  in  the  same  order  as  you  instructed  the  program  at 
line  2400.  The  Variance-Covariance  matrix  is  necessary  to 
find  the  t-statistics. 

The  program  is  slow  but  since  most  of  you  will  use  the 
routine  on  your  own  machine,  CPU  time  does  not  cost  you 
money.  It  should  take  between  5  and  15  seconds  to  perform  a 
2-variable  regression  on  20  data  points.  I  do  not  know  how 
much  core  space  is  needed.  The  program  itself  probably 
takes  up  on  the  order  of  5K,  with  perhaps  as  much  as  10K 
used  by  the  many  matrices.  If  you  find  it  a  tight  squeeze, 
reduce  the  dimensions  of  the  matrices. 

When  running  regressions,  put  as  much  data  as  you  can 
into  the  program.  You  could  try  to  use  three  or  four  different 
dependent  variables  and  one  or  two  dozen  independent  vari¬ 
ables  allowing  you  to  run  several  models  at  one  sitting. 

It  would  probably  be  useful  if  you  saved  your  data  on  tape 
or  disk.  I  didn’t  incorporate  such  a  feature  because  I  wanted 
to  keep  the  program  from  getting  too  machine  specialized. 

Please,  keep  track  of  what  the  variables  represent  No 
provision  for  names  was  made  so  you’ll  have  to  keep  a 
separate  record  of  what  the  variables  mean. 


Sample  Run 

Suppose  you  are  in  the  business  of  manufacturing  widgets. 
You  have  at  your  disposal  the  ACME  Widget  Making  Ma¬ 
chine.  Like  all  machines,  yours  requires  cash  expenditure  for 
maintenance  and,  like  all  machines,  it  will  break  down  from 
time  to  time  despite  your  best  efforts.  You  would  like  to  see 
just  how  the  amount  of  money  spent  on  the  machine  and  the 
amount  of  time  the  machine  runs  each  month  affects  the 
downtime  of  the  unit. 

In  this  case,  downtime  (in  hours)  becomes  our  dependent 
variable  because  it  is  the  ultimate  figure  we  want  to  find.  Our 
independent  variables  are  the  maintenance  costs  and  the 
number  of  man-hours  the  machine  is  used.  We’ve  gathered 
the  following  data  for  the  last  1 1  months: 


DT 

HRS 

MTN 

59  hrs 

976  man-hours 

$1,000 

72  " 

603 

tt  tt 

500 

60  " 

829 

tt  tt 

750 

71  " 

838 

tt  tt 

500 

124  " 

1,201 

tt  tt 

450 

95  " 

1,149 

tt  tt 

700 

101  " 

1,246 

tt  tt 

650 

75  " 

1,054 

tt  tt 

750 

85  " 

1,221 

tt  tt 

800 

103  " 

1,182 

tt  tt 

500 

107  " 

1,076 

tt  tt 

450 

Before  we  run  the  regression,  common  sense  tells  us  to 
expect  the  sign  of  the  coefficient  for  hours  to  be  positive 
because  the  more  the  machine  is  used,  the  higher  a  downtime 
we  should  expect.  The  sign  of  maintenance  is  negative  be¬ 
cause  the  more  money  thrown  into  the  unit,  the  less  fre¬ 
quently  it  should  break. 

The  first  model  I  ran  (See  Sample  Run)  was: 

DT  =  Constant  4-  A,  (HRS)  +  A2(MTN) 

From  the  printout,  we  see  that  the  model  is: 

DT  =  58.646  +  .0757  (HRS)  -  .0786  (MTN) 

Thus,  our  logic  was  right:  the  signs  of  the  variables  match 
what  we  thought  they  should  be.  The  t-statistics,  all  far 
greater  than  2  in  absolute  value,  are  significant,  so  all  the 
coefficients  should  be  kept  in  the  model.  The  high  F  indicates 
the  model  as  a  whole  is  good;  the  R2  of  .885  means  almost 
89%  of  the  variation  in  the  data  is  explained  by  this  model, 
which  is  quite  good. 

Suppose  you  know  that  in  month  twelve  the  machine  will 
be  operating  900  man-hours  and  you  expect  to  pay  $450  in 
preventive  maintenance.  Plugging  into  the  model  shows  you 
should  expect  91.41  hours  of  downtime  and  should  make 
your  plans  accordingly.  Similarly,  if  you  desire  no  more  than 
80  hours  of  downtime  in  a  900  man-hour  month,  you  should 
pay  $595  in  maintenance. 

I  said  earlier  that  changing  the  model  affects  the  accuracy 
of  the  estimators.  In  the  next  two  regressions  of  the  Sample 
Run,  I  show  what  happens  when  this  is  done  .'First,  I  ran  DT 
=  Constant  +  A,  (HRS)  with  the  result  that  the  constant  term 
is  only  13.17.  Notice  that  its  t  is  .5  so  we  would  throw  it  out 
of  our  model,  leaving  DT  =  .0709  (HRS).  The  hours  t  is  now 
only  2.8,  which  is  still  significant  but  not  by  much.  Although 
the  F  is  in  the  safe  zone,  the  low  R-squared  indicates  you 
would  not  want  to  use  this  model  to  predict  downtime  The 
last  Sample  Run  using  maintenance  as  the  independent  vari¬ 
able,  has  an  even  lower  R2.  □ 
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Sample  Run 


INPUT  THE  INDEPENDANT  VARIABLES7  COLUMN  *7 S 
INDEPENDANT  MAR ♦  t  1  ?  2 
INDEPENDANT  MAR ♦  *  2  ?  3 


INPUT  #  OF  OBSERVATIONS * 


*  OF  VARIABLES  < N * K >  ?  11*3 


VARIABLE 


VALUE 


T 


INPUT 

ROW 

* 

1 

INPUT 

ROW 

2 

INPUT 

ROW 

# 

3 

INPUT 

ROW 

* 

4 

INPUT 

ROW 

♦ 

5 

INPUT- 

ROW 

* 

6 

INPUT 

ROW 

# 

7 

INPUT 

ROW 

* 

8 

INPUT 

ROW 

=1 

9 

INPUT 

ROW 

# 

10 

INPUT 

ROW 

* 

11 

?  59  * 976  * 1000 
?  72*603*500 
?  60*8291312*750 
?  71*838*500 
?  124*1201*450 
?  95*1149*700 
?  101*1246*650 
?  75*1054*750 
?  85*1221*800 
?  103*1182*500 
?  107*1076*450 


CONSTANT 

3 


58 ♦ 64618  4 ♦ 261356 

0 ♦ 07570461  6 ♦ 833902 

-0 ♦ 07861646  ~6 ♦ 17648 


R-SQUARED=  0 ♦ 8855503 
F~STATISTIC=  39 ♦ 68731 


MENU 


MENU 


1=PRINT  DATA  MATRIX 
2=CHANGE  AN  OBSERVATION 
3=RUN  REGRESSION 
4 -END 
?  1 

59  976  1000 

72  603  500 

60  8 ♦ 291312E+06  750 

71  838  500 

124  1201  450 

95  1149  700 

101  1246  650 

75  1054  750 

85  1221  800 

103  1182  500 

107  1076  450 


MENU 


?  2 


ENTER  I* J*Xi:i* J3  ?  3*2*829 


MENU 

1 -PR I NT  DATA  MATRIX 
2=CMANGE  AN  OBSERVATION 
3 -RUN  REGRESSION 
4=END 
?  3 


WHICH  IS  THE  DEPENDANT  VARIABLE  ?  1 
HOW  MANY  INDEPENDANT  VARIABLES  ?  2 


WHICH  IS  THE  DEPENDANT  VARIABLE  ?  1 
HOW  MANY  INDEPENDANT  VARIABLES  ?  1 

INPUT  THE  INDEPENDANT  VARIABLES7  COLUMN  #7S 
INDEPENDANT  VAR*  #  1  ?  2 

VARIABLE  VALUE  T 


CONSTANT  13.17355  0*5003132 

2  0*07095304  2*835253 

R- SQUARED-  0*4130986 
F-STATISTIC-  8*038637 


?  3 


WHICH  IS  THE  DEPENDANT  VARIABLE  ?  1 
HOW  MANY  INDEPENDANT  VARIABLES  ?  1 

INPUT  THE  INDEPENDANT  VARIABLES7  COLUMN  *7S 
INDEPENDANT  VAR*  *  1  ?  3 

VARIABLE  VALUE  T 


CONSTANT  133*06  6*412688 

2  -0  *  07257599  -2*318329 

R-SQUARED=  0  *  3043275 
F-ST ATISTIC-  5 ♦ 374579 


MENU 


?  4 


Program  Listing 


00100 

00200 

00300 

00400 

00500 

00600 

00700 

00800 

00900 

01000 

01100 

01200 

01300 

01400 

01500 

01600 

01700 

01800 

01900 

02000 


DIM  Y ( 3 1  *  1 ) *T(31*31) *W(31*31) * B ( 3 1  *  1 ) *V(31*31) * T 1 ( 3 1 ) *  T  $  ( 3 1 ) 

DIM  Wl(31*31) *W2 (31*31 ) *W3( 31*31 ) *U4 (31*31 ) *Y1( 1*31) *C:L< 31) *Z (31 *31) 
PRINT  \  INPUT  -INPUT  I  OF  OBSERVATIONS*  I  OF  VARIABLES  ( N  *  K ) ■ *  N*K 
IF  N<K-1  THEN  PRINT  "N  MUST  BE  >=K~1 ! “  \  GOTO  300 
PRINT 

FOR  1=1  TO  N 

PRINT  "INPUT  ROW  *  ’*1* 

INPUT  T ( I  *  J ) *  FOR  J=  1  TO  K 
NEXT  I 

PRINT  \  PRINT  "MENU"  \  PRINT 
PRINT  "1 -PRINT  DATA  MATRIX" 

PRINT  "2=CHANGE  AN  OBSERVATION' 

PRINT  " 3=RUN  REGRESSION- 
PRINT  "  4=END " 

INPUT  Y2  \  ON  Y2  GOSUB  1600*1900*2000*10700  \  GOTO  1000 
PRINT  \  FOR  1=1  TO  N  \  FOR  J=1  TO  K 
PRINT  T ( I  *  J ) * 

NEXT  J  \  PRINT  \  NEXT  I  \  RETURN 

PRINT  \  INPUT  "ENTER  I*J*XCI*JI  "*I*J*Y2  \  T(I*J)=Y2  \  RETURN 
PRINT  \  INPUT  'WHICH  IS  THE  DEPENDANT  VARIABLE  ■ *C 


Continued 
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02100  INPUT  "HOW  MANY  INDEPENDANT  VARIABLES  " y A 

02200  PRINT  \  PRINT  "INPUT  THE  INDEPENDANT  VARIABLES'  COLUMN  *'S" 

02300  FOR  1=1  TO  A  \  PRINT  "INDEPENDANT  VAR ♦  *  "51?  \  INPUT  Cl (I)  \  NEXT  I 
02400  K1=A+1 

02500  FOR  1=1  TO  31  \  FOR  J=1  TO  31 

02600  W  <  I  y  J  ) y  V  (  I  y  J  > y  W 1  <  I  y  J  )  y  W2 ( I y  J ) y  W3  < I y  J ) y  W4  < I y  J ) y  Z  <  I  y  J  ) =0 
02700  NEXT  J 

02800  Y  ( I  y  1 ) y  B  ( I  y  1 ) vTl(I) ?Y 1(1*1) =0  \  NEXT  I 

02900  FOR  1=1  TO  N  \  W<Iyl)=l  \  Y < I , 1 ) =T ( I y C )  \  NEXT  I  ! Y=DEP  VAR ♦ 

03000  FOR  1=1  TO  A  \  FOR  J=1  TO  N  \  W < J y If 1 ) =T < J y Cl < I ) )  \  NEXT  J  \  NEXT  I 

03100  ! READY  TO  RUN  THE  REGRESSION!!! 

03200  FOR  1=1  TO  K1  \  FOR  J=1  TO  N  \  W1 < I v J ) =W < J y I )  \  NEXT  J  \  NEXT  I 

03300  FOR  1  =  1  TO  K1  \  FOR  ,1=1  TO  K1  \  FOR  D=1  TO  N 

03400  W2 < I y J ) =W2  < I y  J ) 1 W 1 < I y  D ) *W < D  y J ) 

03500  NEXT  D  \  NEXT  ,J  \  NEXT  I 
03600  FOR  1=1  TO  K1  \  FOR  D=1  TO  N 
03700  W3  <  I  y  1 )  =W3  (I  y  1 )  +W 1  ( I  y  D )  * Y  <  D  y  1 ) 

03800  NEXT  D  \  NEXT  I 
03900  GOStJB  6800 

04000  FOR  1=1  TO  Kl  \  FOR  D=1  TO  K 1 
04100  B  (  I  y  1  )  =B  <  I  y  1  )  +W4  <  I  y  D  )  *W3  (  D  y  1  ) 

04200  NEXT  D  \  NEXT  I 

04300  FOR  1  =  1  TO  Kl  \  W2  < 1 y I >  =B ( I y 1 )  \  NEXT  I 
04400  !  GET  THE  VARIANCE-COVARIANCE  MATRIX 
04500  FOR  1  =  1  TO  N  \  Y 1 < 1 y I ) =Y  < I y 1 )  \  NEXT  I 
04600  W8=0 

04700  FOR  1  =  1  TO  N  \  W8=W8+ Y1  ( 1  y  I )  *Y  ( I  y  1 )  \  W3Cl.yI)=0  \  NEXT  I 
04800  FOR  J=i  TO  N  \  FOR  D=1  TO  Kl 
04900  W3 ( 1 y  J ) =W3 < 1 y  J ) +W2 < 1 y  D  >  *W1 <  D  y J ) 

05000  NEXT  D  \  NEXT  J  \  W7=0 

05100  FOR  1=1  TO  N  \  W7=W7+W3 ( 1 y I ) *Y < I y 1 )  \  NEXT  I 
05200  S= < 1/ ( N-Kl >  )  *  < W8-W7 )  ! S=VAR IANCE 

05300  FOR  1=1  TO  Kl  \  FOR  J=1  TO  Kl  \  V < I y J ) =S*W4 ( I y J )  \  NEXT  J  \  NEXT  I 

05400  ! FIND  R-SQUARED  y  F-STAT ♦ ♦ ♦ BUT  FIRST  GET  THE  MEAN  OF  Y 

05500  Y2=0  \  FOR  1=1  TO  N  \  Y2=Y2+Y<Iyl>  \  NEXT  I  \  Y2=Y2/N 

05600  R1=<W7-<N*Y2"2) ) / ( W8- < N*Y2~2) )  ! REGULAR  R-SQUARED 

05700  R2=1-<1~R1)*< <N-1)/<N-K1) )  ! ADJUSTED  R-SQUARED 

05800  F= <  R 1 / A ) / <  < 1 -R1 > / ( N-K 1 ) )  ! F-STAT I ST I C 

05900  ! GET  THE  T-STATISTICS ♦ ♦ ♦STAND*  ERRORS  ARE  THE  DIAGONAL  ELEM ♦  OF  V 
06000  FOR  1  =  1  TO  Kl  \  T 1 < I ) =B < I y 1 ) /SQR ( ABS < V < I y I ) ) )  \  NEXT  I  ! T-STATS 
06100  PRINT  ! START  THE  OUTPUT 

06200  PRINT  "VARIABLE" y "VALUE" y "T" 

06300  PR  I  NT  "  — . - . -  ■  y  " - - — "  y  " - " 

06400  FOR  1=1  TO  Kl  \  T* < I ) =NUM* < I )  \  NEXT  I  \  T$ < 1 )=" CONSTANT " 

06500  FOR  1  =  1  TO  Kl  \  PRINT  T $ ( I ) y B ( I y 1 ) y T 1 ( I )  \  NEXT  I  \  PRINT 
06600  PRINT  ■ R-SQUARED*  " 5R2  \  PRINT  H F-STAT I ST IC=  "?F  \  PRINT 
06700  RETURN 

06800  !  INVERT  SUBROUTINE  t  INVERT  W2 
0-6900  !  FIRST  FIND  THE  DETERMINANT  OF  W2 
07000  N 1 =K 1 

07100  FOR  1  =  1  TO  Kl  \  FOR  ,J  =  1  TO  Kl  \  Z  ( I  y  J )  y  W4  ( I  y  J )  =UI2  ( I  y  J )  \  NEXT  J  \  NEXT 

07200  GOSUB  9000  \  A5=D0  .'GOTO  DET  SUBROUTINE 

07300  !  NOW  MAKE  THE  COFACTOR  MATRIX-  FIND  THE  MINORS 

07400  !  USE  W2  FOR  THE  COFACTOR  MATRIX 

07500  N1=K1-1 

07600  FOR  1=1  TO  Kl  \  FOR  J=1  TO  Kl 
07700  II y 12=1 

07800  FOR  R=1  TO  Kl  \  FOR  S=1  TO  Kl 

07900  IF  R=I  OR  S=J  THEN  8400  ! CROSS  OUT  ITH  ROW y  JTH  COLUMN 

08000  Z ( 1 1 y 1 2 ) =W4 ( R  y  S ) 

08100  IF  I2=N1  THEN  8300 
08200  12=12+1  \  GOTO  8400 
08300  11=11+1  \  12=1 
08400  NEXT  S  \  NEXT  R 

08500  GOSUB  9000  \  W2( I y J)=< (-1 >~( I+J) >*D0  ! COFACTOR  MATRIX 

08600  NEXT  J  \  NEXT  I 

08700  FOR  1  =  1  TO  Kl  \  FOR  J=1  TO  Kl  \  W4 ( I y J ) =W2 < J y I ) /A5  \  NEXT  J  \  NEXT  I 
08800  !  W4  IS  NOW  INVCW2) 

08900  RETURN 

09000  !  DETERMINANT  SUBROUTINE 

09100  D0=1  \  FOR  P=1  TO  Nl-1 

09200  IF  Z < P y P ) <>0  THEN  9900 

09300  FOR  G=P+1  TO  N1 

09400  IF  Z<GyP)<>0  THEN  9600 

09500  NEXT  G  \  D0=0  \  GOTO  10600 

09600  DO=-DO  \  FOR  Fl=l  TO  N1 

09700  D=Z ( P y F 1 )  \  Z<Py FI )=Z<Gf FI )  \  Z(GyFl)=D 

09800  NEXT  FI 

09900  DO=DO*Z<PyP)  \  FOR  P1=P+1  TO  N1 
10000  IF  Z ( PI y P ) =0  THEN  10500 
1 0 1 0  0  F  2 = Z  (  P 1  y  P  )  /  -  Z  (  P  y  P  ) 

10200  FOR  F=P  TO  N1 

10300  Z(PlyF)=Z(PlvF)+F2*Z(PyF)  \  IF  ABS (Z (PI y F ) X=lE-4  THEN  Z(PlyF)=0 
10400  NEXT  F 

10500  NEXT  PI  \  NEXT  P  \  DO=DO*Z < N1 y N1 ) 

10600  RETURN 
10700  END 


Assorted  Sorts 


BY  DAVID  GALEF 


When  you  need  an  alphabetized  list  or  sorted  file  of 
numbers,  it  isn’t  hard  to  construct  a  sorting  program. 
But  will  the  program  be  efficient  and  will  it  be  right  for  the 
problem  at  hand? 

Sorting  has  always  been  an  extremely  important  computer 
function  in  business,  where  lists  of  names,  files  and  code 
numbers  play  an  increasingly  greater  part  each  year.  Sorting 
became  so  important  that  it  prompted  research  into  a  variety 
of  techniques,  each  with  differing  strategies  and  varying 
efficiency.  As  a  useful  computing  application,  sorting  origi¬ 
nated  with  large  computers  for  industry,  rather  than  for  the 
home.  Nonetheless,  sorting  can  be  used  for  simple  inven¬ 
tory,  grading  papers  or  building  directories.  No  one  has  to 
dream  up  far-fetched  home  uses,  since  sorting  fits  thousands 
of  practical  applications  already. 

As  an  example  of  how  sorting  works,  suppose  you  wanted 
to  arrange  a  list  of  numbers  with  the  smallest  at  the  top  of  the 
list,  followed  by  the  second  small¬ 
est,  and  so  on.  Quite  a  few  sorting 
strategies  will  do  the  work  for  you, 
each  with  its  own  patterns  and  shifts. 

Unfortunately,  the  sorts  easiest  to 
comprehend  and  program  are  all  too 
often  those  with  the  lowest  degree  of 
efficiency.  Still,  three  of  the  most 
popular  sorts  for  home  use  are 
simple  and  well  worth  examining. 

Possibly  the  easiest  sort  to  im¬ 
plement  is  the  effective,  but  some¬ 
what  inefficient,  interchange  sort. 

The  strategy  of  the  interchange  sort 
appears  in  Diagram  1.  Basically,  it  starts  with  the  first  two 
numbers  on  the  list  and  if  the  bottom  number  is  smaller  than 
the  top  number,  switches  them.  Then,  the  second  and  third 
entries  are  compared  and  switched  if  necessary;  then  the  third 
and  fourth,  and  so  on.  By  the  end  of  the  list,  the  largest 
number  has  sunk  to  the  bottom  of  the  list,  which  has  become 
partially  sorted.  The  comparisons  begin  all  over  again  from 
the  top  since  each  smaller  number  moves  only  one  step 
toward  the  top  in  any  given  run.  Sample  interchange  runs 
appear  in  Diagram  2. 

Typically,  the  interchange  sort  may  take  up  to  n  runs 
through  a  list  of  n  items  long  (requiring  n—  1  comparisons), 
so  that  the  efficiency  is  of  the  order  Kxn2,  where  K  is  about 
1.  Anyone  familiar  with  the  n2  phenomenon  knows  how 
quickly  the  sorting  workload  can  climb  as  n  increases!  A 


portion  of  the  work  can  be  saved  by  checking  whether  any 
interchanges  have  been  made  in  each  run  through  the  list  (the 
purpose  of  the  flow  chart’s  “out”  flag).  With  no  switches  in 
the  latest  run,  sorting  can  stop  since  all  numbers  are  in  order, 
although  fewer  than  n  runs  were  made. 

A  sort’s  order  of  efficiency  refers  to  the  worst  case  pre¬ 
sented  for  that  sort.  In  the  interchange  sort,  the  worst  case 
occurs  when  the  list  is  originally  inverted  with  the  largest 
number  on  top.  For  some  sorts,  the  worst  case  is  an  already 
sorted  list,  which  the  sort  proceeds  to  destroy  before  building 
it  up  again. 

Despite  its  foibles,  the  interchange  sort  has  the  advantage 
of  an  internal  or  in-place  sort.  All  sortings  can  be  done  by 
switching  number  locations  without  extra  memory  space. 

A  slight  increase  in  efficiency,  though  still  of  n2  order,  can 
be  achieved  with  another  ordering  technique  called  the 
bubble  sort.  The  bubble  sort,  a  modification  of  the  inter¬ 
change  sort,  gets  its  name,  appropri¬ 
ately  enough,  from  the  strategy  it 
uses.  As  shown  in  Diagram  3,  bub¬ 
ble  sort  compares  the  first  and  se¬ 
cond  numbers  just  as  the  interchange 
sort  does.  With  the  bubble  sort, 
however,  the  second  and  third  num¬ 
bers  are  compared  and,  if  switched, 
then  the  first  and  new  second  num¬ 
ber  are  compared.  In  this  way,  the 
third  entry  may  become  the  first, 
finding  its  own  level  like  a  bubble 
rising  through  water.  The  fourth 
number  is  then  “bubbled-up”  — 
compared  with  the  third  entry;  if  switched,  compared  with 
the  second,  and  so  on.  Diagram  4  shows  a  list  being  bubbled- 
sorted.  By  the  time  the  last  number  bubbles  up  from  the 
bottom,  the  list  is  completely  sorted. 

The  most  comparisons  any  entry  undergoes  before  finding 
its  own  level  is  n—  1 .  But  any  entry  not  switched  after  the  first 
check  remains  where  it  is,  never  requiring  further  bubbling 
though  it  may  be  switched  downward  by  another  number 
moving  up.  Because  some  numbers  may  be  bubbled  all  the 
way  up  from  the  bottom  region,  while  others  may  require  no 
bubbling,  the  average  comparisons  necessary  along  the  one 
run  of  n  numbers  is  about  n/2,  and  often  fewer.  The  order  of 
efficiency  is,  of  course,  Kxn2,  since  the  worst  case  requires 
almost  as  much  work  as  the  interchanging  sort’s  worst  case. 
Still,  the  efficiency  now  resembles  nxn/2,  so  the  constant  K 


You  can  use  these 
sorting  techniques 
for  a  variety  of 
applications  such  as 
simple  inventory, 
grading  papers  or 
building  directories. 


is  about  1/2.  Bubble  sort,  an  in-place  process,  is  quite  satis¬ 
factory  for  reasonably  long  lists . 

Another  sorting  procedure,  the  selecting  sort,  uses  a  com¬ 
parison  box  to  find  the  smallest  number  in  the  list  on  each 
run.  As  Diagram  5  shows,  though  the  initial  “smallest” 
number  and  its  rank  on  the  list  are  large  dummies,  the  number 
and  its  rank  will  not  stay  in  the  SMALL  comparison  box  for 
long.  Every  time  a  smaller  number  than  the  one  in  the  box  is 
encountered,  the  smaller  number  and  its  rank  in  the  list 
replace  the  box’s  number  and  rank.  At  the  end  of  a  run 
through  the  list,  the  number  in  the  box  is  taken  off  the  list,  or 
disqualified,  with  its  rank  on  the  list  recorded.  That  number 
is  then  placed  on  a  new,  ordered  list,  which  starts  with  the 


Diagram  1  -  Interchange  Sort 


Initialization:  NMAX  is  the  number  of  entries;  the  compari¬ 
sons  start  at  the  first  entry,  where  1=1. 

Interchanges  are  possible  all  through  the  run,  until  I=NMAX. 
Then,  another  run  starts— unless  OUT=0,  indicating  that  no 
interchanges  were  made  during  the  last  run,  and  the  list  is 
sorted. 


smallest  number  from  the  old  list.  The  comparison  box  is 
filled  once  again  with  the  dummy  value  —  or  the  largest  list 
number  and  its  rank  —  to  begin  another  search  for  the 
smallest  number.  To  ensure  that  the  same  small  numbers 
from  previous  runs  are  not  chosen  again,  a  flag  will  disqual¬ 
ify  it  from  further  consideration.  In  Diagram  6,  the  “out” 
flag  for  the  particular  number  shifts  from  0  to  —  1  when  the 
number  goes  on  the  new  list.  The  sort  ends  when  the  ordered 
list  is  complete.  Because  space  for  the  new  list  must  be  set 
aside,  the  selecting  sort  is  an  external  sort,  requiring  addi¬ 
tional  memory  apart  from  the  original  list  space.  The  order  of 
efficiency  is  still  Kxn2,  though  decreasing  comparisons  for 
each  successive  run  make  it  n  runs  of  about  n/2  comparisons: 
K=  1/2. 

Where  the  selecting  sort  differs  from  the  previous  two 
sorts  lies  in  a  modification  that  can  be  implemented  to  in¬ 
crease  efficiency  by  decreasing  the  value  of  K.  Merely  break 
up  the  original,  unsorted  list  into  two  columns  of  equal 
length,  each  with  its  own  selecting  strategy  and  comparison 
box.  During  each  run,  the  smaller  of  the  two  numbers  in  the 
comparison  boxes  is  put  on  the  ordered  list,  and  another  run 
fills  that  box  again.  This  strategy  saves  steps  because  each 
selecting  sort  is  of  order  (n/2 f ,  with  n  extra  steps  for  the 
comparison  between  the  two  lists’  comparison  boxes.  Thus, 
n2/4  +  n2/4  +  n  beats  n2  by  a  long  shot,  where  n  is  large. 
Naturally,  the  process  can  be  extended  to  breaking  into  three 
lists,  each  with  n/3  items,  for  even  greater  efficiency:  n2/9  + 
n2/9  +  n  2/9  +  2n.  As  the  number  of  small  lists  increases, 
however,  the  number  of  comparisons  among  various  boxes 
becomes  significant,  and  efficiency  starts  to  drop.  Then  the 
programming  can  become  quite  messy. 

There  are,  of  course,  other  sorting  procedures. 

The  digit  sort  works,  not  by  ordering,  but  by  sorting  the 
numbers  first  according  to  their  rightmost  digits,  then 
second- to-rightmost,  and  so  forth.  But  rather  than  actually 
ordering  each  column  of  digits,  wherein  each  column  would 
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Next  run:  10—3  switch,  10—5 
switch,  then  12-0  and  12-9 
switch. 


First  interchange  will  be  10- 
25  switch,  then  3-25.  All  in¬ 
terchanges  in  the  run  serve  to 
bring  25  to  the  bottom. 
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Third  run:  first  switch  is  10— 
0.  Runs  continue  until  sorting 
is  over. 


Diagram  3  -  Bubble  Sort 


Initialization:  NMAX  is  the  number  of  entries;  the  compari¬ 
sons  start  at  the  first  (1=1)  and  second  (K=I+1)  entries.  The 
marker  M  advances  after  each  entry  in  the  list  is  completely 
bubbled.  A  number  is  bubbled  up  until  it  reaches  its  own 
level,  which  may  be  at  the  top  of  the  list  where  1=1.  When  all 
numbers  have  been  bubbled,  M=NMAX  and  the  list  is  sorted. 
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Next  number  to  be  bubbled  is 

5  will  bubble  up  to  its  own  12.  The  sorting  is  over  when 
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Diagram  5  -  Selecting  Sort 


Initialization:  NMAX  is  the  number  of  entries;  each  entry  has 
its  own  OUT  disqualification  flag.  Comparisons  with  the 
dummy  SMALL  value  start  at  the  first  entry  (K=l).  I  marks 
the  progression  of  the  ordered  list.  Each  run,  a  new  SMALL 
number  is  added  to  the  ordered  list;  the  sort  is  ended  when 
the  ordered  list  is  full. 


take  many  steps  to  sort,  “buckets”  representing  each  number 
from  0  to  9  are  used.  In  the  rightmost  column  for  391,  451, 
567,  890  and  345,  the  digit  sort  would  toss  the  first  two 
numbers  into  the  l’s  bucket  in  their  original  order,  while  the 
next  three  numbers  go  into  the  7’s,  0’s  and  5’s  buckets, 
respectively.  For  the  next  column  of  digits,  the  buckets  are 
used  again.  Numbers  are  always  considered  and  placed  in  the 
buckets  by  going  through  the  buckets  in  order,  0  through  9, 
with  the  first  number  in  any  bucket  considered  before  any 
other  entries  in  that  bucket.  Finally,  after  the  numbers  have 
been  distributed  in  the  various  buckets  by  the  leftmost  digit, 
the  list  is  sorted.  The  entire  process  is  shown  in  Diagram  7.  In 
this  case,  the  efficiency  is  quite  good  at  nxd,  where  n  is  the 
number  of  entries,  and  d  is  the  number  of  digits  per  entry. 
Obviously,  though,  it  requires  large  amounts  of  memory  for 
all  the  buckets  used.  Using  a  base  lower  than  ten  can  help 
reduce  memory  space  needs  by  reducing  the  number  of 
buckets  required,  though  it  will  decrease  the  efficiency  by 
increasing  d.  Using  binary  would  require  only  two  buckets,  0 
and  1  —  but  10010  is  more  digits  than  18  in  decimal. 

Another  in-place  sort  is  the  shuttle  sort,  so  named  because 
it  shuttles  numbers  about  on  the  list,  though  it  is  also  known 
as  “quick  sort.”  The  top  number  on  the  list  is  taken  off  and 
put  into  a  comparison  box.  Comparisons  then  proceed  from 
the  top  and  bottom  of  the  list,  with  pointers  as  place-keepers. 
In  each  case,  both  pointers  move  toward  the  middle  of  the 
list.  Each  number  in  the  top  half  of  the  list  (upper  pointer) 
greater  than  the  comparison  box  number,  is  slipped  into  an 
open  slot  in  the  bottom  half  of  the  list.  The  same  follows  for 
numbers  in  the  bottom  half  of  the  list  (lower  pointer)  which 
are  less  than  the  comparison  box  number,  though  they  are 
shuttled  upwards. 

Open  slots  occur  when  other  numbers  move  from  their 
original  places  in  the  list,  and  the  first  slot  opens  when  the  top 
list  number  is  taken  off  and  put  into  the  box  at  the  sort’s 
beginning.  After  that,  there  is  always  an  open  slot  some¬ 
where,  though  its  location  may  change  as  one  open  slot  is 
filled  by  a  number  shuttled  up  or  down.  When  there  is  no 
immediate  place  for  a  particular  number  to  be  shuttled,  the 
other  pointer  advances  until  a  number  in  its  half  must  be 


Diagram  6  -  Selecting  Sort 
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First  number  selected  was 
0  (then  disqualified);  next 
run  selected  3  as  the  smal¬ 
lest  remaining  —  also  dis¬ 
qualified  and  put  on  or¬ 
dered  list.  Next  selection 
will  be  5,  of  rank  4  (4  th 
number),  the  number  in 
the  comparison  box  at  the 
end  of  the  run. 


The  ordered  list  contains 
the  smallest  number  from 
the  raw  list  on  each  run, 
stacked  in  order.  A  select¬ 
ing  sort  with  two  lists  and 
two  comparison  boxes  puts 
the  smaller  of  the  two  box 
numbers  on  the  ordered 
list;  the  larger  stays  until  it 
can  be  compared  with  a 
new  number  in  the  other 
box. 


switched;  then  the  numbers  change  places. 

Diagram  8  shows  a  sample  run.  When  sorting  is  finished 
for  that  run,  the  comparison  box  number  occupies  the  last 
space  left,  neatly  dividing  the  list  into  two  groups:  greater 
than  and  less  than  the  comparison  box  number.  The  list  is 
broken  apart  at  this  juncture,  with  the  box  number  going  to 
the  shorter  list.  The  same  shuttling  process  is  then  performed 
on  the  two  smaller  lists.  Avoid  placing  the  comparison  box 
number  on  top  of  a  new,  shorter  list  because  the  worst  cases 
in  the  shuttle  sort  occur  when  the  largest  or  the  smallest 
number  is  chosen  to  fill  the  comparison  box.  All  numbers  get 
shuttled  to  one  side  of  the  comparison  box  number,  and  form 
two  new  lists:  the  comparison  box  number,  and  the  rest  of  the 
list.  The  efficiency  of  this  sort  can  therefore  be  as  bad  as 
Kxn2  in  a  few  improbably  cases.  When  the  sort  operates 
reasonably,  and  continual  shuttling  breaks  up  lists  into 


Diagram  7  - 
Digit  Sort 


Raw  list 


440 

321 

514 

501 

205 

253 

990 

••• 

••• 

••• 


0 

1 

2 

3 

4  5 

6 

7 

8  9 

440 

990 

321 

501 

253 

514 

205 

501 
205  j 

514 

321 

440 

253 

990 

205 

253 

321 

440 

501 

514 

990 

Buckets:  in  the  first  distribution,  numbers  are  assigned  buck¬ 
ets  according  to  the  l’s  digit;  in  the  next  series,  the  10’s  digit 
counts,  and  so  on.  In  considering  the  numbers  for  buckets, 
the  downward  order  from  bucket  0  to  9  must  be  preserved. 


Diagram  8  -  Shuttle  Sort 


Number  on  top  of  list,  10,  is  put 
in  comparison  box,  leaving  vacan¬ 
cy  on  top.  Two  pointers  start  at  3 
and  25:  no  switches.  At  5  and  9,  5 
is  less  tli an  10  so  it  stays,  but  9 
on  bottom  is  less  than  10,  so  it  is 
shuttled  upward  to  original  10  va¬ 
cancy.  12  on  the  top  pointer  is 
shuttled  down  to  fill  the  vacancy; 
0  goes  to  the  12  space.  In  each 
case,  the  bottom-pointer  numbers 
must  be  less  than  10  to  be 
shuttled  upwards;  the  opposite  is 
true  for  top-pointer  numbers. 


End  of  a  run:  the  numbers  have 
been  partially  ordered  through 
shuttling.  The  box  number  is  put 
back  into  the  open  slot,  a  new 
box  number  is  taken  from  the  top 
of  each  new  list  (9,  and  a  number 
other  than  10  for  the  2nd  list). 
Notice  that  the  two  pointers 
meet  at  the  end  of  each  run. 


ii ii mu  minium 


Diagram  9  -  List  Ordered  by  Links 


Row 

Number 

Link 

, 

5.4 

7 

2 

13.2 

0 

— ►  3 

0.5 

6 

4 

7.6 

10 

5 

4.4 

1 

6 

0.9 

8 

7 

5.9 

4 

8 

3.2 

5 

9 

13.0 

2 

10 

7.6 

9 

Notice  that  the  numbers  aie  still  in  random  order,  but  that 
the  links  establish  an  order.  Starting  at  row  3,  the  next 
largest  number  is  in  row  6:  0.9.  0.9’s  link  points  to  row  8, 
containing  3.2,  and  so  on.  The  beginning  of  the  link  is 
marked  by  an  arrow;  the  largest  number  has  link  0  to  indi¬ 
cate  the  end.  Whatever  the  sorting  used,  the  link  structure  in¬ 
volves  no  lengthy  moving  of  data. 


roughly  half  each  time,  an  impressive  order  of  efficiency 
results.  Continual  halving  means  binary  efficiency,  or 
Kxnxlog2n. 

Neither  the  digit  nor  the  shuttle  sort  are  all  that  easy  to 
program.  Furthermore,  they  share  a  serious  limitation.  Given 
an  already  sorted  or  nearly  sorted  list,  both  sorts  will  first 
aggravate  the  situation,  then  sort  the  disorder  they  have 
created.  For  example,  a  shuttle  sort  presented  with  a  small- 
to-large  ordered  list  would  use  the  top  number,  the  smallest, 
to  order  all  the  others. 


Considerations  such  as  the  relative  order  of  a  list  can 
therefore  be  quite  important.  Many  people  need  sorting  when 
their  lists  are  only  slightly  out  of  order.  For  files  with  huge 
numbers  of  entries,  other  factors  become  important.  The 
merging  sort,  for  example,  is  used  by  many  insurance  com¬ 
panies  not  only  because  of  its  relative  efficiency,  but  also 
because  it  can  work  by  sorting  parts  of  a  file  at  a  time  —  a 
necessary  procedure  with  limited  computer  memory. 

Some  sorts,  as  they  work,  do  not  even  switch  around  data. 
Though  sometimes  costly,  this  process  establishes  links  from 
one  datum  to  the  next,  making  the  order  apparent  —  although 
the  data  are  still  stored  randomly  (see  Diagram  9). 

Perhaps  the  most  efficient  in-place  sort  is  the  heapsort,  a 
technique  employing  an  ordered  binary  tree  with  data  on 
branches  and  a  series  of  three-way  comparisons.  Because  of 
the  binary  technique,  efficiency  is  Kxnxlog2n,  even  in  the 
worst  case.  Heapsort,  in  all  its  phases,  is  on  a  rather  sophisti¬ 
cated  level  in  computer  technology.  When  first  developed,  it 
was  occasionally  the  subject  of  a  computing  science  disserta¬ 
tion.  Unfortunately,  explaining  the  heapsort  requires  at  least 
a  good  quarter  hour  and  a  blackboard. 

Sorting  thus  becomes  a  sub-science  in  itself,  which  would, 
and  has,  filled  a  number  of  books.  Certainly,  earlier  strate¬ 
gies,  such  as  selecting  and  interchanging,  are  enough  to  start 
you  learning.  Possibly  you  can  figure  out  a  few  modifications 
yourself.  Think  of  the  service  you  can  provide.  With  a  good 
sorting  technique  (or  a  few  to  meet  different  conditions)  you 
can  rent  out  your  services  to  almost  anyone.  Merchants  need 
mailing  lists  of  customers,  schools  must  have  student  classi¬ 
fication  and  researchers  want  their  statistics  ordered. You 
probably  have  your  own  uses.  The  list  is  endless.  All  you 
have  to  do  is  sort  it.  □ 


UP  TO  25%  OFF^fi 


QTRS-80  Complete  System 

Includes:  CPU/ Keyboard,  Power  Supply, 
Video  Monitor,  Cassette  Recorder,  Manual, 
and  Game  Cassette. 

©Line  Printer 
©Mini  Disk  System 
OC-10  Cassettes 
©Verbatim  Diskettes 


YOUR  OWN  TRS-80  SYSTEM  AT  TREMENDOUS  SAVINGS 

DISK  DRIVES  IN  STOCK/ 


REG. 

OUR 

ITEM 

PRICE 

PRICE 

Level  II— 4k 

$619.00 

$575.70 

Level  II— 16k 

$849.00 

$789.60 

Expansion  Interface 

$299.00 

$278.10 

Mini  Disk  Drive 

S  495  00 

$  385  00 

Centronics  730  Printer 

$  995.00 

$  1 850.00 

Centronics  101  Printer 

$1595  00 

$1400  00 

Anadex  DP-8000  Printer 

$  895  00 

$  99500 

Memory  Kit -(16K) free  installation  $  14900 

$  98.00 

Verbatim  Diskettes  ea 

$  5  95 

$  4  95 

3 

$  17  89 

$  1200 

10 

$  5900 

$  37  00 

C-10  Cassettes  5 

$  4  95 

S  4  50 

25 

$  24  75 

S  18  75 

Paper  (9V2  x  11  fanfold. 

3500  sheets) 

S  35.00 

$  29.95 

C  A|  E 

oALC 

Centronics  779 

$995.00 

Same  as  Line  Printer  1  (Tractor) 

TRS— 80  MODEL  II 

$3626.00 

•  64 K  RAM 

•  Vs  MEG  DISK 

ADDITIONAL  32K  RAM 

< 

5  418.50 

ADDITIONAL  DISK  DRIVE  (1ST) 

$1069  50 

ADDITIONAL  DISK  DRIVE  (2ND  +  3RD) 

$  558.00 

MINI  DISK  DRIVES  NOW  $385 

Over  S100  less  than  Radio  Shack  s! 


There  are  new  developments  every  day- 
write  or  call  for  the  latest  information. 


777  Henderson  Boulevard  N-6 
Folcroft  Industrial  Park 
Folcroft  PA  19032 
(215)  461-5300 


TOLL  FREE 

1-(800)  345-8102  Orders  only! 

FOREIGN  and  DOMESTIC  DISTRIBUTORSHIPS  AVAILABLE  .  .  . 
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CIRCLE  11 


Simple  Software 
Sound  Effects 


BY  J.  ZDUNEK 


After  the  first  month  or  two  of  computer  ownership,  I 
decided  to  add  extra  hardware  to  my  system,  including  a 
complex  sound  generator  that  could  make  dozens  of  realistic 
sounds.  It  received  great  reviews  from  those  who  heard  it 
report  explosions,  screeching  race  cars  and  other  selected 
noises. 

But,  great  as  the  sounds  were,  the  disadvantages  out¬ 
weighed  the  seemingly  unlimited  uses  of  the  sounds  it  would 
make.  Being  complex  meant  just  that  —  it  took  days  to  get 
the  right  sound,  and  many  times  it  refused  to  work  properly  in 
front  of  an  audience.  What  I  needed  was  a  simpler  way  to  get 
the  job  done  —  through  software. 

I  looked  back  at  some  old  computer  music  assembly 
programs  I’d  written  for  my  8080  microprocessor  and  re¬ 
wrote  them  to  fit  my  TRS-80.  It  worked  off  of  an  output  latch 
on  my  home-built  interface  and  produced  two  channels  of 
square  wave  signals.  Athough  its  quality  did  not  compare 
with  the  complex  generator,  it  was  adequate  for  at  least  70% 
of  my  needs  and  was  worth  keeping  around. 

One  interesting  thing  about  the  operation  of  my  new 
creation  was  that  with  a  few  minor  changes  in  the  program  I 
was  able  to  do  away  with  the  home-built  interface  entirely 
and  use  the  cassette  I/O  circuitry  contained  in  the  TRS-80. 
Since  the  output  circuitry  could  be  borrowed  from  the 
cassette  I/O,  there  would  be  no  need  to  build  any  sort  of 
address  decoders  or  data  buffers.  Because  of  this,  it  would  be 
easy  to  add  sound  effects  programs  to  your  TRS-80  by  simply 
disconnecting  the  grey  cassette  AUX  plug  and  plugging  it 
into  an  amplifier-speaker  system.  Program  1  loads  the  proper 
machine  codes  that  will  activate  the  cassette  I/O  and  produce 
a  number  of  sounds  and  even  music  (of  sorts). 

You  could  use  the  program  to  produce  a  warble  tone  after 
every  keyboard  entry  to  indicate  computer  acceptance,  or  a 
low  raspberry  sound  when  data  order  is  incorrect.  Just  about 
any  game  could  be  improved  with  sounds  such  as  warp  drive 
engines,  phasors  or  pinball  jackpot  melodies.  Special  bell- 
type  indicators  could  screech  out  and  let  you  know  when  an 
error  has  occurred  in  the  program.  Over  64,000  different 
wave  sizes  could  be  produced  without  the  extra  hardware 
(except  for  the  amplifier).  The  small  amount  of  memory 
taken  up  by  the  software  allows  ample  space  for  your  main 
program. 

The  program  requires  a  Level  II  TRS-80  with  4K  memory 
and  an  external  audio  amplifier.  The  frequency  generator,  a 
short  45-byte  machine  language  program,  is  easily  loaded 
from  a  five-line  BASIC  program  that  pokes  in  the  assembly 
listing.  Once  the  routine  is  run,  new  programs  can  be  loaded 
into  the  available  memory  space  and  edited  to  include  the 


audio  output  subroutine.  The  output  is  directed  to  the  cassette 
tape  output  plug,  which  can  be  connected  into  an  audio 
amplifier  system  to  provide  the  necessary  volume.  Sounds 
simple?  Try  it  and  see. 

Machine  Set-Up  Program 

If  you  are  converting  old  programs,  I’d  suggest  saving  this 
first  program  on  the  beginning  of  a  new  cassette  and  then 
transferring  the  edited  programs  on  the  balance  of  the  tape. 
This  procedure  reduces  future  handling  to  one  cassette.  First, 
set  the  memory  size  to  20435  (see  adjustments  for  16K 
systems)  and  then  run  Program  1 . 

Program  1  -  Machine  Set-Up 

10  DATA  0,0,245,197,0,0,0,14,1,0,0,62,1,211,255, 
6,1,16,254,0,0,0,62,0 

20  DATA  211,255,6,1,16,254,0,0.0,13,32,231,0,0,0, 
193,241,201,0,0,0 

30  FOR  C  =  20435  TO  20479  *  READ  E  t  POKE  C,E 

40  NEXT:  FOR  C  =  20435  TO  20479  :  D  *  PEEK(C)  : 
PRINT  D; 

50  NEXT  :  PRINT  M CHECK  LISTING”  :  END 


Be  sure  the  data  on  lines  10  and  20  appear  in  the  exact 
order  as  written,  as  they  are  the  decimal  codes  for  the  ma¬ 
chine  language  routine.  When  the  program  is  run,  the 
memory  locations  are  rechecked  and  printed  out  for  examina¬ 
tion.  If  the  data  output  is  in  the  same  order  as  the  data  input, 
type  NEW  and  load  any  new  or  existing  program.  You  can 
now  add  on  subroutines  that  jump  to  the  machine  locations 
that  make  sound. 

Try  the  following  demonstration  of  a  subroutine  after  you 
have  loaded  and  run  the  machine  set-up  program.  Connect 


the  grey  output  plug  from  the  AUX  input  of  the  cassette 
recorder  to  an  amplifier  system  (the  home  hi-fi  does 
wonders),  and  run  Program  2. 


Program  2  -  Demo. 

10  INPUT  A  x  GOSUB  3000 

20  PRINT  "ENTER"  :  GOTO  10 

3000  •  WARBLE  SUB  (C)  J.  ZDUNEK  1979 

3010  POKE  16526, 211: POKE  16527. 79:F=120: 

FOR  R=1  TO  3  s  FOR  D  *=10  TO  15 
3020  FOKE  20443, D  :  POKE  20451, F  :  POKE  20462, F 
3030  A  =  USR(O)  s  NEXT  :  NEXT  :  RETURN 

With  the  amplifier  properly  connected,  you  should  hear  a 
warble  sound  each  time  you  press  enter.  If  the  word  ENTER 
appears  each  time,  but  no  sound  is  heard,  check  the  amplifier 
volume  and  connections.  If  ENTER  does  not  appear,  recheck 
the  program  listing  —  you  may  have  entered  the  machine 
set-up  program  incorrectly  and  will  have  to  reload  the 
program  from  the  start. 

How  It  Works 

Numerical  time  equivalents  for  the  frequency  “F”  and  the 
duration  “D”  are  assigned  in  line  3010  of  the  demo  program. 
In  line  3020,  the  frequency  and  duration  values  are  poked 
into  the  proper  memory  locations  and  then  program  control  is 
transferred  to  the  machine  language  routine  through  the 
USR(0)  command  in  line  3030.  The  machine  language  rou¬ 
tine  is  a  simple  triple  loop  that  will  activate  digital  highs  and 
lows  on  the  output  latch  in  the  TRS-80  cassette  output  circuit. 
These  highs  and  lows  are  then  amplified  and  converted  into 
audible  sound  waves  by  the  amplifier  system.  Program  3  is  a 
listing  of  the  machine  code  with  Z-80  mnemonics.  Note  that 
the  addresses  and  codes  are  in  base  10. 


Program  3  -  Machine  Code 


Memory  Instruction  Mnemonic  Description 

Location  byte 


20435 

0 

NOP 

(free 

20436 

0 

NOP 

space ) 

2043? 

245 

PUSH  AF 

save  flags  and 

20438 

197 

PUSH  BC 

A,B,&C  registers 

20439 

0 

NOP 

20440 

0 

NOP 

(  free  space  ) 

20441 

0 

NOP 

20442 

14 

UDCI ,  n 

load  DURATION  BYTE 

20443 

1 

(D) 

into  register  C 

20444 

0 

NOP 

(  free 

20445 

0 

NOP 

space) 

20446 

62 

LDAI , n  DU RAT 

load  accumulator  with 

2044? 

1 

(1) 

bit  #1  high  and 

20448 

211 

OUT,  n 

output  to 

20449 

255 

(255) 

cassette. 

20450 

6 

IDBI,  n 

load  reg.  B  with  fl 

20451 

1 

(fl) 

time  byte 

20452 

16 

DJRNZ  ,e  HIGH 

and  hold  output  high 

20453 

254 

(254) 

for  fl  duration. 

20454 

0 

NOP 

20455 

0 

NOP 

(  free  space  ) 

20456 

0 

NOP 

20457 

62 

LDAI,  n 

load  accumulator  with 

20438 

0 

(0) 

bit  #1  low  and 

20459 

211 

OUT,  n 

output  to 

20460 

255 

(255) 

cassette • 

20461 

6 

IDBI,  n 

load  reg.  B  with  f2 

20462 

1 

(1) 

time  byte 

20463 

16 

DJRNZ ,  e  LOW 

and  hold  output  low 

20464 

254 

(254) 

for  f 2  duration. 

20465 

0 

NOP 

20466 

0 

NOP 

(  free  space  ) 

20467 

0 

NOP 

20468 

13 

DEC  C 

decrement  duration  byte 

20469 

32 

JRNZ2 

and  jump  back  to  DURAT 

20470 

231 

(231) 

if  not  equal  to  zero. 

20471 

0 

NOP 

20472 

0 

NOP 

(  free  space  ) 

20473 

0 

NOP 

20474 

193 

POP  AF 

restore  flags  and 

20475 

241 

POP  BC 

A , B , &C  registers 

20476 

201 

RET 

return  to  BASIC  program 

20477 

0 

NOP 

20478 

0 

NOP 

(  free  space  ) 

20479 

0 

NOP 

(  Note 

that 

the  free  spaces 

can  be  used 

for  making 

alterations  ) 

h— pi— ^ 

l 

1 

k-F2— *j 

Figure  1  -  Signal  Output 

Signal  Output 

The  signal  output  in  Figure  1  shows  the  square  wave 
generated  by  the  program.  The  length  of  the  high  signal  is 
determined  by  the  value  of  FI  (in  memory  location  20451); 
the  length  of  the  low  signal  is  determined  by  the  value  of  F2 
(memory  location  20462).  The  number  of  times  one  complete 
wave  cycle  is  generated  is  determined  by  the  duration  “D” 
value  of  (memory  location  20443).  The  actual  duration  or 
amount  of  time  that  a  particular  frequency  is  held  constant 
must  be  corrected  for  time  variance  from  FI  and  F2  and 
would  have  to  be  calculated  when  specific  musical  notes  are 
required.  It  is,  however,  not  very  critical  for  making  ordinary 
sound  effects  “noise” .  See  Program  4  for  an  example  of  how 
musical  notes  could  be  produced. 

Restrictions  and  Alterations 

Since  the  memory  locations  for  F  and  D  are  limited  to  one 
byte  each,  their  values  can  only  be  positive  integers  between 
1  and  255.  Add  extra  register  loops  in  the  machine  listing  if 
longer  durations  and  lower  frequencies  are  needed. 

If  you  wish  to  load  the  machine  listing  on  a  16K  system, 
then  the  FORNEXT  loops  in  lines  30  and  40  of  the  machine 
set-up  program  should  read: 

FOR  C  =  32723  TO  32767 

Set  the  memory  size  at  32723;  Poke  the  values  for  FI ,  F2 
and  D  into  locations  32739,  32750  and  32731  respectively. 


SIMUTEK  PRESENTS 

★  TRS-80  ★ 

. GAMES . 

!!!  WHOLESALE!!! 


*  *  * 


★  * 


★  *  ★ 


*  *  PACKAGE  ONE  ************** 


GRAPHIC-TREK  *‘2000"  —  This  full  graphics,  real  time  game  is  full  of  fast,  exciting  action!  Exploding 
photon  torpedoes  and  phasers  fill  the  screen!  You  must  actually  navigate  the  enterprise  to  dock  with  the 
giant  space  stations  as  well  as  to  avoid  klingon  torpedoes!  Has  shields,  galactic  memory  readout,  damage 
reports,  long  range  sensors,  etc!  Has  3  levels  for  beginning,  average,  or  expert  players!  *  INVASION 
WORG  —  Time:  3099,  Place:  Earth's  Solar  System  Mission:  As  general  of  Earth’s  forces,  your  job  is  to 
stop  the  Worg  Invasion  and  destroy  their  outposts  on  Mars,  Venus,  Saturn,  Neptune,  etc!  Earth's  Forces: 
Androids  —  Space  Fighters  —  Lazcr  Cannon  —  Neutrino  Blasters!  Worg  Forces:  Robots  —  Saucers  — 
Disintegrators  —  Proton  Destroyers!  Multi  level  game  lets  you  advance  to  a  more  complicated  game  as  you 
get  better!  *  STAR  WARS  —  Manuever  your  space  fighter  deep  into  the  nucleus  of  the  Death  Star!  Drop 
your  bomb,  then  escape  via  the  only  exit.  This  graphics  game  is  really  fun!  May  the  Force  be  with 
you!  *  SPACE  TARGET  —  Shoot  at  enemy  Ships  with  your  missiles.  If  they  eject  in  a  parachute, 
capture  them  —  or  if  you're  cruel,  destroy  them!  Full  graphics,  real  time  game!  *  SAUCERS  —  This  fast 
action  graphics  game  has  a  time  limit!  Can  you  be  the  commander  to  win  the  distinguished  cross! 
Requires  split  second  timing  to  win!  Watch  out! 


★  ★ 


*  ★ 


★  *  *  PACKAGE  TWO  ************** 


CHECKERS  2.1  —  Finally!  A  checkers  program  that  will  challenge  everyone!  Expert  as  well  as  amateur! 
Uses  3-ply  tree  search  to  find  best  possible  move.  Picks  randomly  between  equal  moves  to  assure  you  of 
never  having  identical  games.  *  POKER  FACE  —  The  computer  uses  psychology  as  well  as  logic  to  try 
and  beat  you  at  poker.  Cards  are  displayed  using  TRS-80's  full  graphics.  Computer  raises,  calls,  and 
sometimes  even  folds!  Great  practice  for  your  Saturday  night  poker  match!  (Plays  5  card 
draw).  *  PSYCHIC  —  Tell  the  computer  a  little  about  yourself  and  he'll  predict  things  about  you,  you 
won’t  believe!  A  real  mind  bender!  Great  amusement  for  parties.  *  TANGLE  MANIA  —  Try  and  force 
your  opponent  into  an  immobile  position.  But  watch  out,  they’re  doing  the  same  to  you!  This  graphics 
game  is  for  2  people  and  has  been  used  to  end  stupid  arguments.  (And  occasionally  starts 
them!)  *  WORD  SCRAMBLE  —  This  game  is  for  two  or  more  people.  One  person  inputs  a  word  to  the 
computer  while  the  others  look  away.  The  computer  scrambles  the  word,  then  keeps  track  of  wrong 
guesses. 


*****  PACKAGE  THREE  *  *  *  *  *  *  *  *  *  **** 


POETRY  —  This  program  lets  you  choose  the  subject  as  well  as  the  mood  of  the  poem  you  want.  You 
give  TRS-80  certain  nouns  or  names,  then  the  mood,  and  it  does  the  rest!  It  has  a  1000-word  +  vocabulary 
of  nouns,  verbs,  adjectives  and  adverbs!  *  ELECTRIC  ARTIST  —  Manual:  draw,  erase,  move  as  well  as, 
Auto:  draw,  erase  and  move.  Uses  graphics  bits  not  bytes.  Saves  drawing  on  tape  or  disk!  *  GALACTIC 
BATTLE  —  The  Swineus  enemy  have  long  range  phasers  but  cannot  travel  at  warp  speed!  You  can,  but 
only  have  short  range  phasers!  Can  you  blitzkrieg  the  enemy  without  getting  destroyed!  Full  graphics 
real  time!  *  WORD  MANIA  —  Can  you  guess  the  computer's  words  using  your  human  intuitive  and 
logical  abilities?  You'll  need  to,  to  beat  the  computer!  *  AIR  COMMAND  Battle  the  Kamikaze  pilots. 
Requires  split  second  timing.  This  is  a  FAST  action  arcade  game. 


************  ^PACKAGE  FOUR  ************* 


LIFE  —  This  Z-80  machine  language  program  uses  full  graphics!  Over  100  generations  per  minute  make  it 
truly  animated!  You  make  your  starting  pattern,  the  computer  does  the  rest!  Program  can  be  stopped  and 
changes  made!  Watch  it  grow!  *  SPACE  LANDER  —  This  full  graphics  simulator  lets  you  pick  what 
planet,  asteroid  or  moon  you  wish  to  land  on!  Has  3  skill  levels  that  make  It  fun  for  everyone.  *  GREED 
II  —  Multi-level  game  is  fun  and  challenging!  Beat  the  computer  at  this  dice  game  using  your  knowledge  of 
odds  and  luck!  Computer  keeps  track  of  his  winnings  and  yours.  Quick  fast  action.  This  game  is  not 
easy!  *  THE  PHARAOH  —  Rule  the  ancient  city  of  Alexandria!  Buy  or  sell  land.  Keep  your  people  from 
revolting!  Stop  the  rampaging  rats.  Requires  a  true  political  personality  to  become  good!  *  ROBOT 
HUNTER  —  A  group  of  renegade  robots  have  escaped  and  are  spotted  in  an  old  ghost  town  on  Mars!  Your 
job  as  “Robot  Hunter"  is  to  destroy  the  pirate  machines  before  they  kill  any  more  settlers!  Exciting! 
Challenging!  Full  graphics! 


*  *  * 


********  package  five  ************** 


SUPER  HORSERACE  —  Make  your  bets  just  like  at  the  real  racetrack!  8  horses  race  in  this  spectacular 
graphic  display!  Up  to  9  people  can  play!  Uses  real  odds  but  has  that  element  of  chance  you  see  in  real 
life!  Keeps  track  of  everyone's  winnings  and  losses.  This  is  one  of  the  few  computer  simulations  that  can 
actually  get  a  room  of  people  cheering!  *  MAZE  MOUSE  —  The  mouse  with  a  mind!  The  computer 
generates  random  mazes  of  whatever  size  you  specify,  then  searches  for  a  way  out!  The  second  time,  he’ll 
always  go  fastest  route!  A  true  display  of  artificial  intelligence!  Full  graphics,  mazes  & 
mouses!  *  AMOEBA  KILLER  —  You  command  a  one  man  submarine  that  has  been  shrunken  to  the  size 
of  bacteria  in  this  exciting  graphic  adventure!  Injected  into  the  president's  bloodstream,  your  mission  is  to 
destroy  the  deadly  amoeba  infection  ravaging  his  body!  *  LOGIC  This  popular  game  is  based  on 
Mastermind  but  utilizes  tactics  that  make  it  more  exciting  and  challenging  —  has  2  levels  of  play  to  make 
it  fun  for  everyone.  *  SUBMARINER  —  Shoot  torpedoes  at  the  enemy  ships  to  get  points.  Fast  action 
graphics,  arcade  type  game  is  exciting  and  fun  for  everybody! 


*************  PACKAGE  SIX  ************** 


20  HOME  FINANCIAL  PROGRAMS  —  Figures  amortization,  annuities,  depreciation  rates,  interest 
tables,  earned  interest  on  savings  and  much,  much  more.  These  programs  will  get  used  again  and  again.  A 
must  for  the  conscientious,  inflation  minded  person. 


**  *  **********  PACKAGE  SEVEN  ********** 


BACKGAMMON  5.0  —  2  different  skill  levels  make  this  game  a  challenge  to  average  or  advanced  players. 
(Not  recommended  for  beginners).  Looks  for  best  possible  move  to  beat  you!  FANTASTIC  GRAPHICS. 
Plays  doubles  and  uses  international  rules.  *  SPEED  READING  —  Increases  your  reading  speed.  Also 
checks  for  comprehension  of  material.  Great  for  teenagers  and  adults  to  improve  reading  skills.  *  PT  109 
—  Drop  depth  charges  on  moving  subs.  Lower  depths  get  higher  points  in  this  fast  action  graphics 
game.  *  YAHTZEE  —  Play  Yahtzee  with  the  computer.  This  popular  game  is  even  more  fun  and 
challenging  against  a  TRS-80!  *  WALL  STREET  —  Can  you  turn  your  $50,000  into  a  million  dollars? 
That's  the  object  of  this  great  game.  Simulates  an  actual  stock  market! 


NOT  AVAILABLE  A  T  RETAIL  STORES  ANYWHERE 


INSTRUCTION  BOOK  WITH  EACH  PKG. 


ONLY  12.95  EACH!!!! 


ALL  PROGRAMS  GUARANTEED  TO  LOAD 
CASSETTE  PACKAGES  REQUIRE  16K  LEVEL  II 
PACKAGES  ON  DISKETTE  (32K)  $5.00  EXTRA 


Send  check.  Money  Order  or  Bank  Card  # 

TO:  SIMUTEK,  P.O.  BOX  35298 
TUCSON,  ARIZONA  85740 
(602)  882-3948 


PHONE  ORDERS  WELCOME! 


PLEASE  ADD  $2.50  POSTAGE  &  HANDLING  PER  ORDER  I 
1  3  OR  MORE  PACKAGES  GET  10%  DISCOUNT 


Set  the  USR(0)  function  with  POKE  16526,211  and  POKE 
16527, 127  before  using  it  in  a  subroutine. 

With  a  little  trial  and  error,  you  can  produce  a  vast  reper¬ 
toire  of  auditory  madness  from  your  computer.  I  shall  con¬ 
clude  with  a  familiar  little  number;  try  the  routine  in 
Program  4. 


Program  4  -  Tune  Subroutine 

4000  •  TUNE  SUB,  ARRANGED  BY  J.  ZDUNEK 
4010  DATA  130,130,115.100,130,100.115,180,130,130, 
115,100,131,136 

4020  DATA  130,130,115,100,95,100,115,130,137,180, 

155.137,131,131 

4030  POKE  16526,211  :  POKE  l652?,79 
4040  FOR  S  =  1  TO  28  :  READ  F  s  IF  F  =  131  OR 
F  =  136  THEN  4080 
4050  D  »  INT((275-F)*.345) 

4060  F0KE  20443, D  1  POKE  20451, F  :  POKE  20462, F 
4070  A  =  USR(0)  :  NEXT  :  RESTORE  :  RETURN 
4080  D  =  INT((275-F)**?66)  :  GOTO  4060 


When  branched  to  the  subroutine  above,  the  program 
should  play  a  little  tune  through  the  amplifier.  I  cannot 
guarantee  a  melody  due  to  possible  differences  in  your  com¬ 
puter’s  clock  frequency,  but  it’s  worth  trying  just  for  fun. 

Students  of  music  should  be  cautioned  that  the  above 
program  (which  plays  “Yankee  Doodle”)  is  a  quick  and 
dirty  approach  and  should  not  be  considered  a  serious  piece 
of  music.  It  does,  however,  have  some  use  as  an  arcade  game 
melody. 

The  two  data  lines  contain  the  f  values  for  each  note  to  be 
played  in  the  order  as  written.  Note  that  the  frequency  of  the 
note  is  used  to  determine  the  duration.  For  example,  in  line 
4010,  the  first  number  is  130  and  the  second  to  the  last  is  13 1 . 
Both  f  values  are  used  for  the  same  note  although  the  fre¬ 
quency  is  slightly  different.  In  line  4040,  if  the  next  f  value 
read  is  13 1 ,  the  note  duration  is  calculated  to  be  approximate¬ 
ly  twice  as  long  by  branching  to  line  4080.  In  other  words, 
disregarding  strict  frequency  relationships,  note  130  is 
played  as  a  “C”  eighth  note  while  note  131  is  played  as  a 
“C”  quarter  note. 

The  duration  calculations  in  line  4050  and  line  4080  set  the 
note  as  an  eighth  or  a  quarter  and  the  value  calculated  for  D  is 
poked  into  the  proper  location.  You  can  change  the  timing  by 
adjusting  the  last  term  in  the  equation: 

D  =  INT((275-F)  *  C) 

where  C  is  a  number  between  0.05  and  1 .0  for  any  frequency 
f  value  from  20  to  255.  (the  f  values  1  to  19  produce  fre¬ 
quencies  too  high  for  my  tastes.)  You’ll  have  to  experiment 
to  get  additional  notes  required  for  your  own  use  and  add 
other  branches  to  produce  whole  notes,  half  notes  or  what¬ 
ever  the  particular  melody  you  are  making  requires.  □ 


Figure  2  shows  the  musical  notation  of  the  f  values  used  in  the  TUNE 
SUB  program.  Note  that  131  and  136  are  quarter  notes  C  &  B,  while 
values  130  and  137  are  eighth  notes  C  and  B  respectively. 
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QDOS3.0  pTEMBER 
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SOFTWARE  BY  ACS 


HARDWARE  FOR  TRS-80 


□  Monitor  No.  3  . $29.00 

Complete  Machine  Language  Monitor  for  TRS-SO1*  fea¬ 
tures:  Find,  EDIT,  Relocate,  Symbolic  Dump  to  Tape,  etc. 

□  Monitor  No.  4  . $49.00 

All  of  the  commands  that  reside  in  monitor  No.  3,  plus: 
RS-232  I/O,  disk  Program  I/O,  Symbolic  Dump  to  Disk  for 
Loading  into  Disk  Editor/ ASM.,  Track  &  Sec  I/O  for 
modification. 

□  PCLEND . $15.95 

Will  Patch  ASCII  files  of  Basic  Programs  or  text  or  DATA 
FILES  so  that  they  may  be  loaded  into  the  Disk  Version  of  the 
Electric  Pencil  for  Editing  purposes  comes  on  Cassette  that 
will  automatically  create  a  Disk  file  of  PCLEND. 

□  MAKE  TAPE  AND  MAKE  DISK 

for  Cassette  Dealers  . $69.95 

These  are  two  programs  that  will  allow  you  to  take  any  type  of 
Program  from  Disk  and  store  it  on  tape  for  mailing  purposes. 
When  the  user  receives  the  program  in  the  mail  on  cassette, 
it  is  loaded  into  the  computer  which  will  automatically  make  a 
Disk  file  of  the  program. 

□  CP/M  &  C  BASIC  for  the  TRS-80 - 

CP/M  Includes:  MOVCPM,  STAT,  PIP,  Dump,  DDT,  ASM 
(8080),  ED,  plus  6  user  manuals. 

CP/M . $150.00 

C  Basic-2  Includes:  XREF2,  CBAS2,  and  manuals. 

C  BASIC  2 . $99.95 

□  G2  LEVEL  III  BASIC  for  TRS-801-  . Special  $39.95 

□  TELCOM  —  Telecommunications  for  the  TRS-80  -  allows 
on  TRS-80'-  to  communicate  with  another  through  the  RS-232-C 
over  the  phone  line. 


□  Pertec  Disk  Drives  FD-200  . $375.00  ea. 

These  are  40-track  Drives  that  are  completely  compatible 
with  the  TRS-80^  and  Radio  Shack  Drives.  3.0  DOS  in¬ 
cluded.  Will  allow  Turning  Diskette  over  and  Write  on  other 
side. 

□  4-Drive  Cable  for  Pertec  Drives . $35.00 

□  DEC  writer  III,  132  Character . $2500.00 

1 10  to  9600  band  El  A  tractor  feed  keyboard  printer.  This  is 
truly  the  nicest  printer  available.  (30  day  delivery) 

□  701  Centronics  TRACTOR  FEED 

Bidirectional  Printer  . $1500.00 

2Vt  times  as  fast  as  the  Radio  Shack  779  Printer,  has  full  size 
132  Char.  Carriage  Bell  tone.  Complete  with  Cable  plug  in 
and  use.  Shipped  Freight  COD. 

□  200  ns  16K  Dynamic  Memory  Clips  for 

Keyboard  or  Expansion  Interface, 

Lifetime  Guarantee,  complete  . $110 

Lifetime  Guarantee.  Complete  with  Instructions  and  Jumper 
Blocks. 

□  10  Key  Numerical  Keypad  Kit . $79.95 

□  TRS-8CT-  Level  II  -  1 6k  . $750.00 

□  Expansion  Interface . $275.00 

.$  89.00 


□  RS-232-C  Interface 


ORDER  NOW  AND  SAVE 

Just  list  the  items  you  want 
and  mail  this  convenient  coupon. 


piMHB  Orders  received  by  6:00  p.m.  shipped 
next  day  on  Master  Charge,  Visa, 
Certified  Check  or  Money  Order. 
Personal  Checks  require  14  days  to 
HBKj  clear.  No  C.O.D.  Collect  calls  not 
accepted.  All  Hardware  warranted  for  90  days 
except  Radio  Shack  equipment  which  is  warrant¬ 
ed  through  Radio  Shack.  Software  guaranteed 
for  replacement  only.  Prices  subject  to  change 
without  notice. 


Send  Check  or  Money  Order  payable  to  — 

SOFTWARE  •  P.O.  Box  60097 


Nashville,  TN  37206 


Quan.  ,  Description 


□  Check 

□  Money  Order 

□  MasterCharge 

□  Visa 

Card  No.  _ 


Automated 
Computer 
Software  service 

(615)  244-2798 

Division  of 

f  !ni|iui  llioild  Inc 

625  Main  Street  •  Nashville,  TN  37206 


Address 


HANDLING  CHARGE  $1.50 

TENN.  RES.  ADD  6%  SALES  TAX  TOTAL 

Part  2 


Calculator 

Accounting 

- BY  MARLIN  SNOW - 


Not  only  can  the  TI59  calculator  do  business  accounting 
as  discussed  in  Part  I,  but  it  can  also  be  a  time  saver  for 
tax  accountants.  Relevant  data  can  be  programmed  and 
recorded  on  magnetic  cards,  eliminating  the  need  to  refer  to 
tax  tables.  Taxable  income  is  entered  into  Label  A  and  the  tax 
is  displayed. 

Before  writing  the  program,  construct  a  tax  table  like  the 
one  illustrated. 


(1) 

Taxable  Income 

Tax  Table 
(2) 

Base  Tax 

(3) 

% 

(4) 

Less 

0-  2,000 

_ 

2 

_ 

2,000  -  4,000 

40 

3 

20 

4,000  -  6,000 

100 

4 

60 

6,000  -  8,000 

180 

5 

120 

8,000  -10,000 

280 

6 

200 

10,000-12,000 

400 

7 

300 

12,000  on 

540 

8 

420 

The  first  3  columns  represent  a  typical  tax  table.  Column  4 
is  a  correction  factor  to  make  programming  easier.  It  reduces 
the  number  of  steps  required  to  program  the  table.  Normally, 
the  tax  on  2,500  is  calculated:  2,500  —  2,000  X  .03-f40  =. 
This  method  uses  18  key  strokes.  When  the  correction  factor 
in  column  4  is  used,  the  key  strokes  are:  2,500  X  .03  =  —20 
= .  Key  strokes  are  reduced  to  14.  Programming  a  small  table 
does  not  require  the  use  of  column  4.  However,  if  you  have  a 
long  tax  table  with  an  extremely  large  number  of  tax 
brackets,  the  use  of  column  4  will  enable  you  to  get  all  of  the 
program  into  the  calculator.  Column  4  is  computed  by  mul¬ 
tiplying  the  taxable  amount  by  the  %,  then  subtracting  the  tax 
as  computed  in  the  regular  way.  Using  the  example  above, 
2,500  X  .03  =  75.  The  normal  computation  is  55.  75  less  55 
=  20  —  which  is  the  correction  factor  for  this  bracket, 
(column  4). 

The  routine  shown  at  right  (with  comments)  is  continued 
for  each  bracket  until  all  of  the  tax  table  is  programmed.  The 
complete  program  is  given  in  the  Program  Listing. 


Program  Key  Key 

Location  No.  Symbol  Comments 


000 

76 

LBL 

Insert  label  A 

001 

11 

A 

002 

42 

STO 

Store  taxable  income 

003 

01 

01 

in  memory  #01 

004 

75 

_ 

Less 

005 

02 

2 

2,000 

006 

00 

0 

007 

00 

0 

008 

00 

0 

009 

95 

= 

equals 

010 

77 

GE 

The  amount  in  the  register  is  compared 
to  the  amount  in  the  T  register  (0).  If 
the  amount  in  the  display  is  equal  to  or 
larger  than  0,  go  to  the  next  tax 

011 

00 

00 

bracket,  memory  location  021.  If  the 

012 

21 

21 

amount  in  the  display  is  less  than  0, 
compute  the  tax  in  this  bracket. 

013 

43 

RCL 

Recall 

014 

01 

01 

memory  01 

015 

65 

X 

Times 

016 

93 

.02 

017 

00 

0 

018 

02 

2 

019 

95 

= 

equals  tax  on  amount  entered  in  label  A 

020 

91 

R/S 

Stop  program.  Tax  is  displayed. 

021 

43 

RCL 

Recall 

022 

01 

01 

memory  01 

023 

75 

- 

less 

024 

04 

4 

4,000 

025 

00 

0 

026 

00 

0 

027 

00 

0 

028 

95 

= 

equals.  If  the  figure  in  the  register  is 

029 

77 

GE 

equal  to  or  larger  than  0,  go  to  the  next 

030 

00 

00 

bracket,  location  043.  If  the  amount  in 

031 

43 

43 

the  register  is  less  than  zero,  compute 
the  tax  in  this  bracket 

032 

43 

RCL 

Recall 

033 

01 

01 

memory  01 

034 

65 

X 

Times 

035 

93 

.03 

036 

00 

0 

037 

03 

3 

038 

75 

_ 

less 

039 

02 

2 

20  (Refer  to  column  4  of  tax  table) 

040 

00 

0 

041 

95 

= 

equals  tax. 

042 

91 

R/S 

Stop  program.  Tax  is  displayed. 

Program  Listing 


070 

071 

072 

073 

074 

075 


00 

00 

35 

77 

00 

88 


0 

0 

GE 

00 

88 


111 

112 

113 

114 

115 

116 


31  R/S 
43  RCL 
0 1  0 1 
75  - 

01 
02 


1 


000 

76 

L8L 

035 

33 

076 

43 

RCL 

117 

00 

0 

oo  i 

11 

fl 

036 

00 

0 

077 

01 

01 

118 

00 

0 

002 

42 

STD 

037 

03 

3 

078 

65 

X 

119 

00 

0 

003 

01 

01 

038 

cr 

;  • J 

« 

073 

33 

. 

120 

35 

= 

004 

75 

- 

033 

02 

2 

080 

00 

0 

121 

77 

GE 

005 

02 

2 

040 

00 

0 

081 

05 

5 

122 

01 

01 

006 

00 

0 

041 

35 

082 

75 

- 

123 

36 

36 

007 

00 

6 

042 

31 

R/S 

083 

01 

1 

124 

43 

RCL 

008 

00 

0 

043 

43 

RCL 

084 

02 

2 

125 

01 

01 

003 

35 

= 

044 

01 

01 

085 

00 

0 

126 

65 

X 

0 1 0 

77 

GE 

045 

75 

086 

95 

= 

127 

93 

. 

011 

00 

00 

046 

06 

6 

087 

91 

R/S 

128 

00 

0 

012 

21 

21 

047 

00 

0 

088 

43 

RCL 

129 

07 

7 

013 

43 

RCL 

048 

00 

0 

083 

01 

01 

130 

75 

014 

01 

01 

043 

00 

0 

030 

75 

131 

03 

3 

015 

65 

X 

050 

35 

031 

01 

1 

132 

00 

0 

016 

33 

051 

77 

GE 

032 

00 

0 

133 

00 

0 

017 

00 

0 

052 

00 

00 

033 

00 

0 

134 

95 

= 

018 
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As  a  rule  of  thumb,  each  tax  bracket  requires  30  program 
locations  when  the  tax  bracket  is  1,000,000  and  over.  The 
federal  estate  tax  table  has  21  tax  brackets  from  0  to 
5,000,000  and  uses  553  program  locations.  The  state  death 
tax  credit  table  has  the  same  number  of  brackets  and  program 
steps,  554,  for  a  total  of  1,107.  It  is  desirable  to  have  both 
tables  in  the  calculator  because  the  federal  tax  is  computed 
net  of  the  state  death  tax.  Since  the  maximum  program  steps 
that  the  TI59  can  handle  is  960,  both  tables  obviously  cannot 
be  put  into  the  calculator  at  the  same  time.  However,  this  can 
be  done  by  sending  your  programs  to  TI  to  be  made  into  a 
custom  library  module. 

Custom  Libraries 

If  you  have  a  TI58  or  TI59  program  especially  applicable 
to  situations  where  at  least  500  potential  users  (sales  forces, 
auditors,  accountants,  insurance  agents,  etc.,)  share  a  com¬ 
mon  task,  you  may  submit  the  program  to  TI  to  be  tooled  and 
produced.  Your  own  library  programs  will  then  be  put  into 
custom  modules  similar  to  TTs  standard  library  modules. 
(See  “Random  Access,”  Personal  Computing,  April,  1979) 

Custom  modules  have  the  five  following  advantages: 

1)  A  full  5,000  steps  are  available,  as  in  standard 
libraries. 

2)  Common  subroutines  can  be  shared,  making  still  more 
space  available. 

3)  Solid-state  programs  cannot  be  accidently  erased. 
And,  they  can  be  protected  —  preventing  disclosure  of  pro¬ 
prietary  information. 

4)  Several  programs  can  be  executed  without  having  to 
handle  magnetic  cards. 


5)  Quick  access  to  programs  becomes  available  with  the 
less  expensive  TI  Programmable  58  rather  than  just  the  TI59. 

TI58  and  TI59  come  equipped  with  a  master  library  of 
solid  state  software  programs  contained  in  a  small  module 
inserted  in  the  back  of  the  calculator.  This  module  contains 
25  separate  programs  which  can  be  called  up  by  number, 
used  individually,  or  incorporated  into  your  own  programs. 
In  addition,  you  may  purchase  specialized  modules  such  as 
statistics,  real  estate/investments,  business  decisions,  etc. 

TI  offers  the  Professional  Program  Exchange  (PPX-59) 
which  makes  software  (developed  by  current  TI59  owners) 
available  to  other  users.  By  using  PPX-59  as  a  vehicle  to 
contribute  and  obtain  programs,  you  will  be  able  to  increase 
the  usefulness  of  your  T159  and  broaden  your  professional 
base.  □ 


PPX,  an  activity  of  Texas  Instruments ,  was  formed  to 
provide  useful  services  to  its  members .  Dues  are  $18  a 
year-prepaid  by  MO  or  check.  Members  receive ,  as  an 
introductory  offer,  three  free  programs  chosen  from 
PPX’ s  catalog  of  1700  different  titles.  Members  also 
receive  instructions  on  how  to  write  and  submit  pro¬ 
grams  for  the  PPX.  Acceptable  programs  are  pur¬ 
chased  by  PPX ,  then  listed  in  the  catalog.  In  addition, 
members  receive  an  informative  newsletter  6  times  a 
year  and  the  exchange  serves  as  a  source,  through 
which  accessories  may  be  ordered.  The  address  is  TI; 
PPX  Dept.  ;  PO  Box  53 ;  Lubbock,  TX  79408.  Tel.  no.: 
806-741-3277 . 


Merging 

on  the  Pet 


Did  you  ever  write  two  good  pro¬ 
grams  and  realize  they  would  work 
great  together  as  one  program,  or  write 
a  short  program  that  would  make  a 
good  subroutine  in  a  larger  program, 
but  have  no  easy  way  to  merge  them? 
Or  even  more  aggravating,  have  you 
ever  wanted  to  use  half  of  one  program 
and  half  of  another  to  produce  a  new 
program?  To  merge  the  two,  you  have 
to  load  one  program,  destroy  all  the 
unwanted  lines  in  that  program,  and 
then  type  in  all  the  wanted  lines  from 
the  second  program.  And  with  the  Pet 
keyboard,  the  more  typing  you  can 
avoid,  the  better. 

All  these  problems  prompted  me  to 
sit  down  and  figure  out  some  way  to 
merge  all  or  part  of  two  or  more  pro¬ 
grams  into  one. 

Right  away,  I  decided  that  it  was 
unlikely  I  would  be  able  to  disassemble 
BASIC  and  find  the  secret  to  the 
mystery.  So  I  put  together  some  of  the 
things  I  knew  that  I  thought  might  be 
useful.  First,  I  knew  that  memory  loca¬ 
tion  525  contains  the  number  of  charac¬ 
ters  in  the  keyboard  buffer.  Also,  loca¬ 
tions  527  to  536  contain  the  actual 
characters  in  the  buffer.  By  changing 
the  contents  of  these  addresses,  you  can 
fool  the  computer  into  thinking  you’ve 
pressed  keys  when  you  really  haven’t. 

I  decided  I  could  use  the  keyboard 
buffer  along  with  a  tape  file  to  print 
lines  of  programming  on  the  screen  and 
then  set  the  computer  to  do  carriage 
returns  on  these  lines,  entering  the  lines 
into  the  new  program. 

My  first  problem  was  to  get  a  listing 
of  the  programs  like  they  appear  on  the 
screen  into  a  tape  file.  I  asked  myself, 
“If  I  can  list  the  programs  on  a  printer, 
why  can’t  I  list  them  on  tape  the  same 
way?’’  I  opened  an  output  file  on  tape 
#1,  then  told  the  tape  to  “listen**  by 
typing  “CMD1’’.  Finally  I  listed  the 
program.  Success!  Instead  of  listing  the 


- BY  DAVID  MULDER - 

program  on  the  screen,  the  Pet  listed  it 
on  tape  #1.1  closed  file  1  to  ensure  that 
the  cassette  buffer  was  emptied.  With 
testing  I  found  I  could  list  all  or  any 
portion  of  the  program  depending  on 
what  I  needed. 

At  this  point,  I  wrote  a  first  draft  of 


the  Merge  program.  When  I  ran  the 
program,  it  opened  the  file  I  had 
created,  printed  the  first  line  of  pro¬ 
gramming  on  the  screen,  and  per¬ 
formed  a  carriage  return  on  that  line. 
The  line  was  now  part  of  the  new  pro¬ 
gram. 


Program  Listing 


6300:1.  OPEN  1>1*0 

63002  POKE  610*1 *  POKE  578*1*  POKE  588*1*  POKE  598* OJ 

PRINT  "Clear  Down  Down" 

63003  BET  #1*A$*  IF  (ST)  AND  64  THEN  CLOSE  1* 

POKE  525*0 *  GOTO  63009 

63004  IF  M  «  CHE# (13)  THEN  63006 

63005  B*  «  B$  +  A#  *  GOTO  63003 

63006  IF  UALCBHO  *  0  THEN  B«  «  " " *  GOTO  63003 

63007  PRINT  B *?*  B$  «  " -  *  PRINT *  PRINT  "RUN  63002“ * 

PRINT  "Home" 

63008  POKE  525*3*  FOR  X  «  1  TO  3*  POKE  525+X*13* 

NEXT*  END 

63009  R $  =:  "RUN  63010"*  INPUT  "ANY  MORE  FILES"*  A$J 

IF  LEFT  $  <  A$  *  1 )  -  "Y"  THEN  63001 

63010  Y  «  0 

63011  PRINT  "Clear  Down  Down"*  PRINT  "63010  Y »6-* 

FOR  X  «  .1.  TO  6*  PRINT  X+Y+63000*  NEXT 

63012  POKE  525*9*  PRINT  R** "Home"  1  FOR  X  a  l  TO  9* 

POKE  525 TX *  .1 3 *  NEXT*  END 
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But  when  the  program  went  back  for 
the  next  line,  “FILE  NOT  OPEN 
ERROR”  appeared.  In  stopping  the 
program  to  empty  the  keyboard  buffer 
and  then  having  it  run  again  from  line 
63003,  I  was  closing  the  file  on  tape 
#  1 .  So  I  dug  up  some  old  articles  on 
files  and  searched  for  a  hint.  Line 
63002  is  what  I  found.  Memory  loca¬ 
tion  620  contains  the  number  of  open 
files.  Location  578  contains  the  device 
number  of  the  first  file  opened.  Loca¬ 
tion  588  contains  the  file  reference 
number  of  the  first  file  opened.  And 
finally,  location  598  contains  the 
mode,  either  input  or  output,  of  the  first 
file  opened.  Setting  these  file  registers 
to  the  correct  values  each  time  the  file  is 
used  keeps  the  file  open. 

The  last  three  lines  of  the  program 
print  the  Merge  program’s  line  num¬ 
bers  on  the  screen  and  then  do  carriage 
returns  on  them.  This  procedure  erases 
the  Merge  program,  leaving  only  the 
new  program  you’ve  created. 

To  use  the  program  you  need  one 
tape  to  save  the  Merge  program  on  and 
a  good  quality  tape  for  files.  Before 
listing  your  programs  as  files  be  sure 
the  line  numbers  of  the  two  programs 
do  not  overlap.  (To  avoid  overlapping 
line  numbers,  use  a  renumbering  pro¬ 
gram  such  as  the  one  in  PC,  March 
1979,  p.  24.) 

Now  you’re  ready  to  merge  your 
programs  by  following  these  steps: 

1.  Load  one  of  the  programs  to  be 
merged.  (Order  is  not  important  since 
the  program  uses  existing  line 
numbers.) 

2.  Insert  the  file  tape  and  rewind. 

3.  Type  “OPENl,l,l:CMDl”. 

4.  List  the  portion  of  the  program 
you  wish  merged. 

5.  Type  “CLOSE1”. 

6.  Load  the  next  program  to  be 
merged. 

7.  Insert  the  file  tape  but  do  not 
rewind. 

8.  Type  “OPENl,l,l:CMDl”. 

9.  List  the  wanted  portion  of  the 
program. 

10.  Type  “CLOSE1”. 

1 1 .  If  you  want  to  merge  more  pro¬ 
grams,  go  to  step  6. 

12.  Load  Merge  program. 

13.  Insert  file  tape,  rewind  and  run. 

Each  time  the  program  finishes  a 

file,  it  will  ask  if  you  want  to  merge  any 
more  programs.  You  can  merge  as 
many  files  as  you  want.  When  you 
answer  that  there  are  no  more,  the 
Merge  part  of  the  program  will  be  de¬ 
stroyed  and  you’ll  be  left  with  your  new 
program.  □ 


BY  PATRICK  SESLAR 


Interested  in  using  my  microcom¬ 
puter  for  word  processing,  I  devel¬ 
oped  this  program  to  assist  in  typing 
letters  or  other  text  information. 

Although  the  program  provides  sev¬ 
eral  time-saving  shorthand  notations, 
correcting  mistakes  must  be  done  on 
the  CRT  on  an  as-typed  basis  using  the 
backspace  and  re-entering  text  where 
necessary  on  the  current  line.  Once  a 
line  has  been  entered  by  hitting  the  re¬ 
turn  key,  it’s  too  late  to  make  changes 
on  that  line.  For  my  purposes,  the  lim¬ 
ited  editing  ability  of  the  program  has 
presented  no  problem;  I  use  the  pro¬ 
gram  for  short  letters  and  for  writing 
descriptions  of  my  other  programs  for 
future  reference. 

This  program,  written  for  a  Compu- 
color  with  16K  RAM,  uses  an  ASR-33 
Teletype  for  output.  Only  four  char¬ 
acters  are  prohibited:  those  on  lines  15 
through  18,  since  they  initiate  editing 
actions  later  in  the  program. 


Certain  commands  may  be  unique  to 
the  Compucolor,  such  as  the  PLOT 
commands  on  lines  5  and  247  (line  5 
clears  the  CRT  screen;  line  247  sets  the 
printer  baud  rate  and  the  output  status 
word).  Both  the  memory  location  of  the 
output  status  word  (-24918)  and  the 
status  word  itself  (130  =  CRT,  66  = 
printer  and  CRT)  may  vary  with  older 
or  newer  Compucolor  models  (see  lines 
220,  247  and  260). 

Line  10  reflects  my  response  to  the 
“comma”  on  input.  On  my  computer  a 
comma  signals  the  end  of  an  input 
string;  therefore,  if  a  comma  is  acci¬ 
dentally  input,  all  text  after  the  comma 
on  that  line  will  be  lost.  Using  a 
instead  overcomes  this  limitation.  The 
substitute  is  easily  interpreted  to  print 
as  a  comma  on  output  (lines  1 10  and 
190).  The  other  three  editing  characters 
(@,  >,  <)  are  fairly  self-explanatory. 

Line  20  prints  a  reference  line  for 
gauging  the  length  of  input  lines.  I’ve 


set  the  length  at  64  characters  to  stay 
well  within  the  limits  of  my  printer, 
since  the  tab  editing  command  (>) 
permits  lines  longer  than  64  characters. 
Line  92,  an  additional  safeguard 
against  jamming  the  print  head,  causes 
any  characters  in  excess  of  64  to  be 
printed  on  the  next  line. 

Line  50  automatically  prints  the 
input  line  number  and  accepts  the  input 
text. 

Line  105  is  a  reaction  to  what  may  be 
unique  to  my  machine  as  it  prints  a  0 
for  the  letter  O.  I’ve  provided  a  substi¬ 
tution  routine  to  print  the  proper  char¬ 
acter  but  other  Compucolor  users  may 
not  need  it. 

Lines  145,  200  and  265  contain  de¬ 
lay  loops  which  allow  the  print  head  to 
return  to  the  beginning  of  the  next  line. 
On  my  system,  the  printer  will  drop  the 
first  character  of  the  next  line  before  it 
can  get  to  its  starting  position  if  a  delay 
is  not  included. 
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'  /'  F  0 R  COMMA  O  1 

FOR  END  OF  LINE  OattlpIC  IYUI! 

•  >f  F  OR  TAB  5  SPACES 

•  <’  FOR  END  OF  TEXT 


SAMPLE  OUTPUT  OF  PROGRAM 

@@@DEAR  J0HN/@@>H0V  ARE  YOU?  I'VE  BEEN  UP  TO  SOME  NEW  TRICKS 
WITH  MY  COMPUCOLOR  COMPUTER/  SUCH  AS  THIS  TV  LETTER  WRITER. 

@  @  >>>>S INC ERE LY/ @ @ > >  > >PAT 


5  < 

INPUT  COMPLETE 

SAMPLE  OUTPUT  OF  PROGRAM 

DEAR  JOHN, 

HOW  ARE  YOU?  I  * VE  BEEN  UP  TO  SOME  NEW  TRICKS 
WITH  MY  COMPUCOLOR  COMPUTER,  SUCH  AS  THIS  TV  LETTER  WR I  TER . 

SINCERELY, 

PAT 

DO  YOU  WISH  TO  OUTPUT  TO  PRINTER?  NO 
READY 


Program  Listing 

5  PL0T  12 
7  DIM  A$ (7 , 1 0) 

10  PRINT  "LETTER  PR  I NTER" : PRINT 
15  PRINT  "USE  * /'  F0R  C0MMA” 

15  PRINT  "USE  '  F  0R  END  0E  LINE" 

17  PRINT  "USE  • >'  F0R  TAB  5  SPACES" 

18  PRINT  "USE  '<•  F0R  END  0F  TEXT" 

20  F0R  X=1  T  0  54:  PRINT  ”-"J:NEXT 
30  PRINT: CLEAR  4500 

continued 


The  program  is  structured  to  print  out 
text  on  the  CRT  to  allow  proofreading 
prior  to  hard  copy  printing.  Regret¬ 
tably,  there  is  no  correction  routine  in 
the  program.  If  an  error  is  discovered  it 
must  either  be  ignored  or  the  program 
rerun  and  all  text  reentered. 

If  the  text  passes  proofreading,  you 
may  go  to  printer  output.  Line  245 
gives  you  time  to  make  sure  the  printer 
is  on  and  paper  positioned.  Any  input 
response  causes  the  program  to  begin 
printing. 

When  output  to  the  printer  is  com¬ 
plete,  the  program  will  ask  again  if  out¬ 
put  to  the  printer  is  desired.  YES  re¬ 
sponses  allow  for  multiple  originals 
while  a  NO  terminates  the  program. 

The  most  obvious  modification  to 
my  program  would  be  to  develop  a  cor¬ 
rection  routine  to  be  inserted  after  line 
225.  Such  a  routine  could  let  you  enter 
a  line  number  followed  by  the  corrected 
text. 

A  second  relatively  simple  modifi¬ 
cation  might  allow  text  to  be  saved  on 
disk  for  future  or  frequent  use.  I  have 
not  included  this  capability  in  my  pro¬ 
gram,  since  my  Compucolor  FCS  (File 
Control  System)  is  different  from  the 
file  systems  I’ve  observed  on  other 
microcomputers.  □ 

DR.  DALEY  presents 
Software  for  the  PET  and  the  APPLE 


35  for  y=o  to  6 

40  F  OR  X=1  T  O  10 

50  PRINT  C 10*Y)+X; : INPUT"  ";A$<Y,X> 

SO  I*  A$(Y,X)="<"  THEN  80 
70  NEXT  X:NEXT  Ys PR I NT : PR  I NT 
80  PRINT  "INPUT  COMPLETE" : I =0 
9  0  FOR  Y=0  TO  6  :F0R  X=  1  TO  10 

91  FOR  7  =  1  TO  LEN  (AS(Y,X)> 

92  IF  LL >6 4  3  0T  0  26  5 

100  B$  =  MIDS ( A$ ( Y ,X),7,1) 

105  IF  B$  =  "0"  THEN  185 
1  10  IF  B$  =" /"  THEN  190 
120  IF  BS  =" @ "  THEN  200 
130  IF  BS  =" >"  THEN  210 
1 35  IF  BS  =" <"  THEN  220 
140  LL  =  LL+ 1 : PR  I NT  B$  ; 

145  NEXT 2 : PRINT : LL=0 :F  OR  DD= 1  T0  300; NEXT  DD 
147  NEXT  X:NEXTY 
180  GOTO  220 

185  PRINT"0"; :LL=LL+1 :30T0  145 
1 90  PRINT  :  3  0T0  145 

200  PRINTsFOR  DD-1  TO  300:N£XT  DD:30T0145 
210  LL=LL+5 : PRINT  "  ",#:G0T0  145 

220  POKE-24918, 1 30 

225  PRINT: INPUT"D0  YOU  WISH  T0  OUTPUT  T0  PRINTER?  "IDS 
230  IF  DS  ="YES”  THEN  245 
240  GOTO  270 

245  INPUT  "IS  PRINTER  ON?  "IES 

247  DL0T  27 :PL0T  146:PL0T  49 : POKE-249  1 8,65 

250  GOTO  90 

260  POKE -24918, 130 

264  GOTO  270 

265  PRINT:F0R  DD=1T0  300:NEXT  DD:LL=O:G0T0  100 
270  ELD 


Dr.  Daley’s  software  is  proud  to  announce 
the  release  of  a  package  of  our  best  selling 
programs. 

These  programs,  regularly  retailing  for  over 
$400,  have  been  assembled  into  a  single 


package  for  only  $49.95.  Included  is  our  best 
selling  TREK3,  CHECKBOOK,  and  a  mailing 
list,  tutorials,  games  and  puzzles  for  every 
member  of  the  family.  All  attractively 
packaged  in  an  album. 


50  PROGRAMS  ONLY  $49.95* 

♦After  January  1,  1980  the  price  will  be  $69.95.  Disk  version  $10  extra. 

Your  order  will  be  shipped  within  four  business  days  from  receipt. 

Charge  your  order  to 
MC/VISA 


DR.  DALEY,  425  Grove  Avenue,  Berrien  Springs,  Michigan  49103 

Phone  (616)  471-5514  Sun.  thru  Thurs.,  noon  to  9  p.m.  eastern  time. 

CIRCLE  14 


This  Johnny  Gan 
Run  the 
Computer 


BY  ELIZABETH  A.  WHALEN 

Johnny  can’t  read?  Alphabetize? 
Syllabicate?  This  Johnny  can! 
Johnny  finished  second  grade  but 
couldn’t  read,  add,  subtract  or  do  his 
lessons.  He  didn’t  have  the  necessary 
skills  to  function  in  third  grade.  To  help 
Johnny  with  his  problems  his  mother 
hired  me  as  a  private  tutor. 

At  first  we  worked  with  pencil  and 
paper,  flash  cards  and  books.  Then, 
after  my  husband  bought  a  Pet,  the 
tutoring  changed  dramatically!  I  need¬ 
ed  a  way  to  give  Johnny  fifty  problems 
in  addition  or  subtraction  quickly  and 
offer  praise  for  the  correct  answer.  My 
husband  put  out  a  call  to  that 
mysterious,  invisible  network  of  com¬ 
puter  owners  and  MATH  (an  uncopy¬ 
righted  program  which  he  modified  to 
fill  my  needs)  was  loaned  for  us  to 
copy. 

MATH  is  programmed  for  addition, 
subtraction,  multiplication  and  divi¬ 
sion.  I  can  use  the  operations  singly  or 
in  pairs.  The  degree  of  difficulty  of  the 
problem  is  dictated  by  the  user.  When 
we  first  started  working  this  program, 
Johnny  needed  some  basic  addition  in 
his  memory  bank  (Johnny  likes  that 
term).  I  would  push  the  right  keys  and 
simple  problems  would  appear  on  the 
screen.  I  could  control  the  difficulty 
with  each  fifty  problems.  It  wasn’t  long 
before  I  included  subtraction.  The  drill 
was  magnificent!  Johnny  learned  to 
operate  the  Pet  as  well  as  add  and 
subtract. 

His  classroom  teacher  suggested 
Johnny  needed  work  on  alphabetizing. 
So  my  husband  disappeared  into  our 
back  bedroom  with  the  Pet  and  in  about 
two  hours  he  had  programmed  ALPHA. 
No  bells  and  whistles  are  on  this  pro¬ 
gram  except  praise  for  a  correct 
answer.  It  is  a  very  functional  program 
any  child  can  run  and  any  adult  can 
program.  With  the  selection  of  the  right 


key  I  can  produce  lists  of  up  to  ten 
words  for  him  to  alphabetize.  It  doesn’t 
take  much  time  because  he  doesn’t 
need  to  type  the  entire  word,  only  the 
number  of  the  word  in  the  right  order. 

When  Johnny  started  working  with 
syllabification  at  school  (the  second 
time  around)  it  became  clear  he  was 
lost.  So  again,  my  husband  disappeared 
with  the  Pet  for  a  couple  of  hours  and 
program  SYBL  was  created.  SYBL  lets 
me  drill  on  breaking  up  the  words  into 
proper  syllables.  First  the  word  is 
printed  on  the  screen.  Johnny  reads  it 
aloud  while  I  listen  for  the  use  of  new 
word  attack  skills.  If  the  word  is  entire¬ 
ly  new  we  spend  time  working  on  its 
pronunciation.  Then  the  Pet  asks  how 
many  syllables  are  in  the  word.  Johnny 
says  the  word  out  loud  for  me  and  we 
talk  about  vowel  sounds  and  pieces  of 
words.  When  he  has  decided  just  how 
many  syllables  are  contained  in  the 
word  he  presses  the  correct  number  on 
the  keyboard.  Next  he  must  divide  the 
word  correctly,  using  the  keyboard. 
Each  syllable  is  followed  by  hitting  the 
return  key  until  the  word  is  finished. 
Then  the  computer  tells  him  whether  he 
is  right  or  wrong.  If  he  has  completed 


the  sequence  incorrectly  it  reprints  the 
word  and  we  start  over.  When  he  is 
correct  he  receives  printed  praise  as 
well  as  my  positive  oral  reinforcement. 

When  Johnny  first  came  to  me  for 
tutoring  he  had  no  sight  vocabulary. 
We  worked  with  flash  cards  and  read¬ 
ing  aloud  before  the  advent  of  the  Pet.  I 
wanted  a  reading  program  which  would 
insert  his  name  and  make  the  reading 
lesson  very  personal.  Again  my  hus¬ 
band  holed  up  with  the  Pet  for  a  couple 
of  hours  and  STORY  was  on  tape. 
STORY  is  a  list  of  short  sentences  which 
make  up  a  sever  line  story.  It’s  pro¬ 
grammed  to  print  the  name  of  the  child 
and  one  of  his/her  friends.  Ours  are 
goofy  stories  because  the  Pet  makes  a 
random  selection  of  the  sentences, 
programmed  to  produce  the  shortest 
story  available. 

We  have  incorporated  words  Johnny 
has  in  his  memory  bank,  new  words  he 
will  need  everyday  and  a  few  words 
from  science,  such  as  pterodactyl.  This 
is  the  program  he  asks  to  use  most 
frequently.  He  likes  to  see  his  name  on 
the  screen  and  laughs  uproariously  as 
strange  little  stories  appear  in  front  of 
him.  Johnny  reads  aloud  for  me.  He  has 


Illustration  by  Josh  Randall 


ALPHA  SYBL 

Sample  Run  Sample  Run 


THIS  PROGRAM  DRILLS  ON  ALPHABETIZING  A  LIST  OF  WORDS. 

THE  LIST  OF  WORDS  WILL  APPEAR  IN  RANDOM  ORDER  AND  THE  STUDENT 
IS  TO  TYPE  THE  NUMBERS  IN  CORRESPONDING  ORDER  TO  PUT  THE  WORDS 
IN  ALPHABETICAL  ORDER 

THE  STUDENT'S  SCORE  WILL  BE  GIVEN  AFTER  THE  LAST  ENTRY. 

HIT  ANY  KEY  WHEN  READY  TO  START 

ENTER  LENGTH  OF  LIST 
MUST  BE  LESS  THAN  10 
?  5 

WHAT  IS  YOUR  NAME 
7JEFF 

WELL  JEFF  LET'S  SEE  HOW  WELL  YOU  CAN  PUT  WORDS  IN  ORDER 
WHEN  THE  LIST  OF  WORDS  APPEARS  ENTER  THE  NUMBERS  IN  FRONT  OF  THE 
WORDS  IN  THE  RIGHT  ORDER  TO  ALPHABETIZE  THE  LIST 
HIT  RETURN  AFTER  EACH  NUMBER  IS  ENTERED 

PRESS  ANY  KEY  JEFF  WHEN  YOU  ARE  READY 


WHAT  IS  YOUR  NAME? 

?JEFF 

THIS  PROGRAM  HAS  A  LIST  OF  WORDS  OF  UP  TO  3  SYLLABLES 
YOUR  JOB,  JEFF,  IS  TO  TELL  HOW  MANY  SYLLABLES  EACH  WORD 
HAS  THEN  ENTER  THE  SYLLABLES  IN  THE  RIGHT  ORDER 
PRESS  ANY  KEY 
SAT 

HOW  MANY  SYLLABLES? 

?  1 

RIGHT  YOU  ARE 1 1 


1  MOTOR 

2  THROW 

3  NARROW 

4  WARM 

5  THRASH 


ENTER  THE  SYLLABLES  AND  PRESSRETURN  AFTER  EACH  ONE 
?  SAT 

JEFF  YOU  ARE  BECOMING  A  GENIUS 


TYPE  THE  NUMBER  FOR  ALPHABETICAL  ORDER 
HIT  RETURN  AFTER  EACH  NUMBER 

IF  YOU  MAKE  A  MISTAKE  TYPE  '10*  FOR  THE  NEXT  ENTRY 
AND  THE  PROBLEM  WILL  START  OVER  WITH  THE  SAME  LIST 

1 

3 
5 
2 

4 

JEFF  LIST  PET  LIST 


LEGEND 

HOW  MANY  SYLLABLES? 

?2 

RIGHT  YOU  ARE  1 1 

ENTER  THE  SYLLABLES  AND  PRESS  RETURN  AFTER  EACH  ONE 
?  LE 


MOTOR 

MOTOR 

NARROW 

NARROW 

THRASH 

THRASH 

THROW 

THROW 

WARM 

WARM 

YOU  GOT  5  RIGHT  OUT  OF  5 


7GEND 

SORRY,  BUT  THAT  IS  NOT  QUITE  RIGHT  PLEASE  TRY  AGAIN 


STORY 


SUPERDUPERI  i#S&l I 

WOULD  YOU  LIKE  ANOTHER  LIST  (Y-N) 


even  asked  to  run  this  program  at  the 
end  of  his  lesson  while  I  talk  to  his 
mother,  making  a  lesson  without  a 
teacher. 

Occasionally  I  use  a  game  which 
helps  teach  logic.  It  is  a  sophisticated 
version  of  tic  tac  toe  called  MAXIT. 

MAXIT  consists  of  a  graphic  square 
filled  with  small  squares,  each  contain¬ 
ing  a  positive  or  negative  number.  It 
can  be  played  against  the  Pet  or  against 
another  person.  The  object  of  the  game 
is  to  get  the  highest  score  and  force  the 
opponent  to  take  negative  numbers. 
Here  the  players  must  think  ahead 
several  moves  and  say  “what  if”. 
Johnny  learns  to  compute  his  score  and 
that  of  his  opponent,  think  ahead  to 
possible  moves  that  he  or  the  Pet  can 


make  and  work  with  negative  numbers. 

The  Pet  has  changed  my  tutoring 
style!  Drills  become  games;  reading,  a 
quick  positive  achievement.  All  of  the 
programs  I  use  are  quick  to  program:  A 
couple  of  hours  produces  something  I 
can  use  comfortably  and  successfully. 
The  programs  can  be  used  in  the  class¬ 
room  or  in  private  tutoring. 

Educationally,  the  computer  is  a 
giant.  It  can  help  a  child  accomplish 
goals  while  enjoying  the  experience.  It 
can  also  help  teachers,  freeing  them  to 
work  with  others  while  giving  children 
the  needed  drills. 

We’ve  heard  that  Johnny  can’t 
read.  Well,  this  Johnny  can  read, 
compute,  do  his  daily  lessons  and  run 
a  computer!  □ 


Sample  Run 

WHAT  IS  YOUR  NAME?  JEFF 
WHO  IS  YOUR  FRIEND?  DIANE 


JEFF  AND  DIANE 

FLEW  TO  THE  JUNGLE 

WHILE  THERE 

JEFF  SAW  A  HORSE 

AND  WAS  REALLY  SCARED 

DID  YOU  SEE  THE  DRAGON? 

IT  WAS  ORANGE  AND  PURPLE  AND  GREENl 

DO  YOU  WISH  ANOTHER  VERSION  (Y-N) 

?  Y 

JEFF  AND  DIANE 

WENT  INTO  THE  WOODS 

WHEN  THEY  ARRIVED 

JEFF  RAN  TO  A  LEDGE 

AND  GIGGLED  WITH  EXCITEMENT 

DID  YOU  SEE  THE  UNICORN? 

HE  HAS  A  PURPLE  NOSE  I 

DO  YOU  WISH  ANOTHER  VERSION  (Y-N) 
?Y 


STORY  Program  Listing 

1  REN  PROGRAM  TO  WRITE  A  STGRV 

2  REM  AUTHOR  BOB  WHALEN  APRIL  1978 

10  PRINT  "  WHAT  IS  VOUR  NAME?"  _  ,  t  ...  _ 

20  INPUT  B$<  1>  Note:  In  these  listings,  PRINT  3  means 

30  PR  I  NT"  WHO  IS  VOUR  FRIEND?"  “clear  the  screen". 

40  INPUT  B$<2> 

45  FOR  1=1  TO  4  SPRINTS  NEXT 
50  FOR  I  =  1  TO  5 
60  READ  A$<I> 

70  NEXT  I 

80  DATA  "WENT  INTO  THE  WOODS" , "WENT  TO  TOWN" , "WENT  TO  THE  BEACH" 

85  DATA  "FLEW  TO  THE  SOUTH  PACIFIC" , "FLEW  TO  THE  JUNGLE" 

90  FOR  1=1  TO  6 
100  READ  C$<  I  > 

110  NEXT  I 

120  DATA  "WHILE  THERE", "WHEN  THEV  ARR I UED ", "BEFORE  THEV  LEFT" 

125  DATA  "NEXT  DRV", "THAT  EUENING" , "NEXT  MORNING" 

130  FOR  1=1  TO  6 
148  READ  D$<I> 

150  NEXT  I 

160  DATA  "  SAW  A  HORSE","  RAN  TO  A  LEDGE","  TRIPPED  ON  A  LOG" 

165  DATA  "  SAW  A  BIG  BEAUTIFUL  BIRD","  CLIMBED  A  TREE","  SLID  DOWN  A  BANK" 

170  PRINT  B*<1>J"  AND  "JB$<2> 

180  C=RND<TI > 

190  C= I NT < C*6 > 

195  IF  C<1  GOTO  188 
200  PRINT  A$<C> 

210  D=RND<TI > 

220  d=int<7*d:> 

225  IF  CK1  GOTO  210 
230  PRINT  CT<D :> 

240  E=RND<TI> 

250  E=INT<7*E> 

255  IF  E< 1  GOTO  240 

256  H=RHD<TI > 

257  IF  H< .  5  THEN  X$=B$< 1 > 

258  IF  H>-  5  THEN  X$=B$<2> 

260  PRINT  X$;  D$<E> 

270  FOR  1=1  TO  5 
280  READ  F$<  I 
290  NEXT  I 

300  DATA  "AND  WAS  REALLV  SCARED", "AND  WAS  EXCITED" , "AND  SAID,  WOW!" 

306  DATA  "AND  SAID  WHAT  A  THRILL !", "AND  GIGGLED  WITH  EXCITEMENT" 

310  G=RND<TI> 

320  G=  I  NT  <6*0 
330  IF  G<  1  GOTO  310 
340  PRINT  F$<G> 

345  GOSUB  500 

350  FOR  1  =  1  TO  3s  PRINTS  NEXT 

360  PR I NT "DO  VOU  WISH  ANOTHER  UERSION<V-N> " 

370  INPUT  XT 

380  IF  XT= " N "  GOTO  400 

390  GOTO  45 

400  STOP 

500  FOR  1=1  TO  4 
510  READ  KT< I > 

526  NEXT  I 

530  DATA  "DID  VOU  SEE  THE  DRAGON?" , "DID  VOU  SEE  THE  PTEROD ACT VL? " 

540  DATA  "DID  VOU  SEE  THE  GIANT  WORM?" , "DID  VOU  SEE  THE  UNICORN?" 

550  C 1 =RND  <  T I > 

560  C 1  =  I NT  <  5*C 1 > 

570  IF  Cl< 1  GOTO  550 
580  PRINT  KT < C 1 > 

590  FOR  1=1  TO  5 
600  READ  LT  < I > 

610  NEXT  I 

620  DATA  "HE  ROARED  IN  THE  CAUE","HE  HAS  A  PURPLE  NOSE!" 


87©  PR I NT "NOW  "JNTJ",  HOW  DID  VOU  GUESS  THAT" 

871  PR I NT" ANSWER,  ITS  RIGHT!!" 

872  RETURN 


9O0  DATA "FOCUS" , "FO" , "CUS" , " " , "LEGEND" , "LEG" , "END" , " " 

910  DATA "UAC ANT", "UA", "CANT", "", "SPIRAL", "SPI", "RAL", "" 

',  "FLA", "UOR", "", "SOLID", "SOL", "ID", " " 

*, "FUT", "URE", "", "MOTOR", "MO", "TOR", "" 

' , "PAL" , "ACE" , " " , "EUER" , "EU" , "ER" , " " , "NECK" , "NECK" , " " , " " 
"NEAR", "", "", "HEAT",  "NEAT" , "FITTER", "PIT", "TER", "" 

96G  DAT  A " P I CN I C " , "PIC" , "NIC" , "GARDENER" , "GAR", "DEN", "ER", "SIX", "SIX", "", " 
970  DATA "GINGERBREAD", "GIN", "GER", "BREAD", "GRANDFATHER", "GRAND", "FA", "THER" 
980  DATA "TEACHER", "TEACH", "ER", "", "TOGETHER", "TO", "GETH", "ER" 

990  DATA "TEARS" , "TEARS" , "SIT" , "SIT" , " " , "Jl , "SELL" , "SELL" , "", " " 

1000  DATA "THOUGHT " , "THOUGHT" , " " , " " , "THROUGH" , "THROUGH" , " " , "" 

1010  DATA " TROUBLE " , "TROU" , "BLE" , " " , "MONEV" , "MON" , "EV" , " " , "BELL" , "BELL" , " " , " " 


920  DATA " FLAUOR " 
930  DATA "FUTURE" 
940  DATA "PALACE" 
950  DATA "NEAR",' 


1 ©20  DATA " MERRV " , " MER " , " RV " , 
1030  DAT A "POLITE", "PO", "LITE 
1 040  DATA "PLEASE" , "PLEASE" , " 
1050  DAT A "HANDLE", "HAN", "DLE 
1 060  DATA " W I NDOW " , " W IN"," DOW 
1 070  DATA " WOMAN "  ,  " WOM" , " AN " , 


" , "MAVOR" , "MAV" , "OR" , " " , "FELL" , "FELL" , " " , 

, " " , "POLICE" , "PO" , "LICE" , " " , "SURE" , "SURE" 

, "", "HANDED", "HAND", "ED", "", "SAT", "SAT", " 

, "", "HAPPEN", "HAP", "PEN", " ", "BELL", "BELL" 

, "", "WORKMAN", "WORK", "MAN", "", "BILL", "BILL 
", "STANDING", "STAND", "ING", "", "SUCH", "SUCH 


ALPHA  Program  Listing 

1  REM  PROGRAM  ALPHA 

2  REM  AUTHOR  BOB  WHALEN  DEC  1978 
10  DIM  A$<60> , B$<60> , C$<60) , B<60> 

15  PR I NT "3" 

20  PRINT"  ***  ALPHABETIZE*** 

25  PRINT: PRINT 

30  PRINT "THIS  PROGRAM  DRILLS  ON  ALPHABETIZING  A  LIST  OF  WORDS. 

40  PR I NT "THE  LIST  OF  WORDS  WILL  APPEAR  IN  RANDOM  ORDER  AND  THE  STUDENT 
50  PRINT" IS  TO  TYPE  THE  NUMBERS  IN  CORRESPONDING  ORDER  TO  PUT  THE  WORDS 
55  PRINT" IN  APHABETICAL  ORDER 

60  PR I NT "THE  STUDENT'S  SCORE  WILL  BE  GIUEN  AFTER  THE  LAST  ENTRV. 

64  PRINT: PRINT 

65  PR I NT" HIT  ANV  KEV  WHEN  READV  TO  START 
70  GET  A*: IF  A*=""  THEN  70 

72  PRINT: PR I NT "ENTER  LENGTH  OF  LIST" 

73  PR I NT "MUST  BE  LESS  THAN  10" 

74  INPUT  Z: IF  Z>9  THEN  73 

75  PR I NT "3" 

80  PRINT: PR I NT "WHAT  IS  VOUR  NAME" 

90  INPUT  N$ 

100  PRINT  "3" :  PRINT  "WELL  "iN$J"  LETS  SEE  HOW  WELL  VOU  CAN  PUT  WORDS  IN  ORDER" 
110  PR I NT "WHEN  THE  LIST  OF  WORDS  APPEARS  ENTER  THE  NUMBERS  IN  FRONT  OF  THE 
120  PR I NT" WORDS  IN  THE  RIGHT  ORDER  TO  ALPHABETIZE  THE  LIST 
130  PRINT"HIT  RETURN  AFTER  EACH  NUMBER  IS  ENTERED 
140  PRINT: PRINT 

150  PRINT "PRESS  ANV  KEV  " JN*J"  WHEN  VOU  ARE  READV 
160  GET  R$: IF  AT=" "  THEN  168 
180  X=1 

200  FOR  1=1  TO  58 
210  READ  AS  Cl;: NEXT 
.215  RESTORE 
228  A=  I  NT  <  RND  <  T I ;  *59  > 

230  IF  A< 1  THEN  220  ‘ 

240  FOR  J=1  TO  Z 
250  IF  B< J>=A  THEN220 
260  NEXT 

270  B$<X>-A$<A>:C$<X>=A*<A>:B<X:>=R 
280  X=X+ 1 

290  IF  X<=Z  THEN  220 
380  PRINT "3" 

318  FOR  1=1  TO  Z 

328  PR I NT  T AB  <  3  > , I , B$  < I > : NEXT 


630  DATA  "IT  LOOKED  flWFULLV  HUNGRY"  ,  "THE  SHARP  TEETH  WERE  SCARY'" 
640  DATA  "IT  WAS  ORANGE  AND  PURPLE  AND  GREEN'" 

650  C2=RND<TI> 

660  C2— INT  <6*C2> 

670  IF  C2< 1  GOTO  650 
680  PRINT  LT < C2 > 

690  RESTORE 
700  RETURN 


SYBL  Program  Listing 

10  DIM  flT<51  >, BT<51  }  ,  CT<51  >  ,  DT<51  > 

20  REM  ***SYBL*** 

30  REM  WRITTEN  BY  R  C  WHALEN  2/10/79 
32  PR  I  NT  "  3  " :  F*R  I  NT :  PR  I  NT 

35  PRINT: PR I NT "WHAT  IS  YOUR  NAME  ? 

36  INPUT  NT 

37  PR I NT " 3 " : PR I NT : PR I NT 

40  PR  I  NT  "THIS  PROGRAM  HAS  A  LIST  OF  WORDS  OF  UP  TO  7  SYLLABLES 
45  PRINT  " 

50  PR  I  NT  "YOUR  JOB,  ";NT;",  IS  TO  TELL  HOW  MANY  SYLLABLES  EACH  WORD  HAS 
55  PRINT 

60  PR I NT "THEN  ENTER  THE  SYLLABLES  IN  THE  RIGHT  ORDER" 

65  PRINT:  PR I NT "PRESS  ANY  KEY" 

70  GET  XT: IFXT=""THEN  70 

100  FOR  1=1  TO  47 

110  READ  AT  < I > , BT  < I > , CT< I > , DT  < I } 

120  NEXT 

130  PRIHT"3": PRINT: PRINT 
200  A=  I  NT  <  RND  <  T I  >  =+=48  > 

210  IF  A< 1  THEN  200 
220  PRINT  TAB<9>  AT < A > 

225  PRINTS PRINT 

230  X= 1 :  IF  •  GT<fl><  >"  "  THEN  X=2 

240  IF  DT<fl>< >" "  THEN  X=3 

250  PR I NT "HOW  MANY  SYLLABLES  ?" 

260  INPUT  V:  IF  VOX  THEN  708 
270  PRINT: PRINT" RIGHT  YOU  ARE! !" 

230  PRINT:  PR  I  NT  "ENTER  THE  SYLLABLES  AND  PRESS  RETURN  FFTER  EACH  nNtr" 

290  PRINT 

300  FOR  1=1  TO  X 

310  INPUT  GT < I > : NEXT 

320  IF  GT-<  1  ><  >BT<FD  THEN  708 

325  IF  X=1  THEN  880 

330  IF  GT<2>< >CT< A>  THEN  780 

335  IF  X=2  THEN  388 

340  IF  GT < 3 > <  >DT < A >  THEN  788 

358  GOTO800 

760  PRINT: PRINT 

710  PRINT "SORRY,  BUT  THAT  IS  NOT  QUITE  RIGHT  PLEASE  TRY  AGAIN" 

720  FOR  J=1  TO  900: NEXT 

738  PR I NT "3" SPRINT: PR I NT  TflB<9>  AT < A > 

740  PRINT: PRINT 
750  GOTO  250 

880  PRINT "3": PR I NT: PR I NT 
810  GOSUB  340 
820  FOR  J=1  TO  1900: NEXT 
825  PR I NT " 3 " : PR I NT : PR I NT 
830  GOTO  280 

840  B= I NT < RND <  T I > *6  > : I F  B< 1  THEN  840 
845  ON  B  GOTO  350,855,860,865,870 
850  PR I NT" SUPER  DUPER  " ; NT 
352  RETURN 

855  PRINT  NT l "  YOU  ARE  BECOMING  A  GENIOUS" 

857  RETURN 

860  PR I NT " ZOW IE!!  "  J  NT A  R I PP I N  GOOD  ANSWER " 

862  RETURN 

365  PR I NT " K AZZOOOOOOOMMM !  ! ,  YOU  SURE  ARE  HARD  TO  FOOL,  " j  NT 
867  RETURN 


338  B=1 : C=1 : FOR  1=1  TO  18+Z 
332  Q=B 

334  IF  LEN < CT < C > >< B  THEN  B=LEN<CT<C>> 

336  IF  LEN < CT < C+ 1 > >< B  THEN  B=LEN<CT<C+1 > > 

340  IF  ASC < M I DT < CT <  C  > , 1 ,  B  >  > >ASC < M I DT <  CT  <  C+ 1 > , 1 , B > > THEN  GOSUB  708 
345  B=Q 

350  IF  C.+2>Z  THEN  C=0 
368  C=C+ 1 : NEXT 
378  IF  B>5  THEN  398 
388  B=B+1 : C=1 
390  PRINT: PRINT 
395  GOSUB  728 

400  PR I NT "TYPE  THE  NUMBER  FOR  ALPHABETICAL  ORDER" 

410  PRINT"HIT  RETURN  AFTER  EACH  NUMBER" 

412  PRINT"  IF  YOU  MAKE  A  MISTAKE  TYPE  '10'  FOR  THE  NEXT  ENTRY 
414  PRINT"  AND  THE  PROBLEM  WILL  START  OUER  WITH  THE  SAME  LIST 
428  R=0 : T=8  SPRINT: PR I NT 
438  FOR  1=1  TO  Z 
440  INPUT  E<I> 

442  IF  E < I >  >Z  THEN  300 
445  D$(I)=B$(E(I)) 

450  IF  DT<I>=CT<i:>  THEN  R=R+1 
468  T=T+1 
478  NEXT I 

480  PRINT "3" SPRINT: PR I NT 

490  PRINT"  "JNTJ"  LIST" 1 "  PET  LIST  " 

500  PRINT: PRINT 
510  FOR  1=1  TO  Z 

528  PRINT  T AB < 1 > , DT <  I  > , CT <  I  > : NEXT 
538  PRINT: PRINT 

548  PRINT" YOU  GOT  "JRJ"  RIGHT  OUT  OF  "JT 
542  IF  R=T  THEN  GOSUB  900 
550  PRINT: PRINT 

568  PRINT "WOULD  YOU  LIKE  ANOTHER  LIST  <V-N>" 

578  INPUT  LT: IF  L$="N"  THEN  800 
580  GOTO  188 

600  DATA "FOCUS" , "LEGEND" , "U AC ANT" , "SPIRAL" , "CABIN" , "FLAUOR" , "SOLID" 

618  DATA "FUTURE" , "MOTOR" , "PALACE" , "NARROW",  "BIKE" , "LAMP" , "GIFT" 

62C  DATA "STAMP" , "EUER" , "CHAIR" , "OUER" , "BOX" , "BEND" , "BUS" , "BANK" , "PINCH" , "POND" 
633  DATA "PRETTY" , "PLAN" , "MASTER" , "GHOST" , " INSIDE" ,  " ISLAND" , "WARM" , "PATCH" 

643  DATA "MATCH" , "WRONG", "SHOP" , "SHEEP" , "SHALL" , "SHIP" , "GRAND", "GRUMPY", "GROW" 
650  DATA "GREAT", "THREAD", "THRASH", "THROW", "THRIFT",  "THREE", "THINK" , "THROW" 

660  D ATA "THAN", "YARD", "WORD", "YEAR", "WOULD", "UERY", "YELLOW", "MOM", "GNU" 

738  XT=CT  <  C  !:• :  CT  <  C  >  =CT  -X+ 1  >  :  CT  -C  C+ 1  >  =XT 
710  RETURN 

723  FOR  J=1T02: FOR  F=1  TO  Z-l 

730  IF  ASC < CT < F >  >  = ASC < CT < F+ 1 > >  THEN  GOSUB  1200 
743  NEXT  F : NEXT  J 
753  RETURN 
893  STOP 

900  A= I NT  <  RND  <  T I >  +7  > 

913  IF  A< 1  THEN  900 

928  MT < 1 > = " EXCELLENT  SCORE!!" 

925  MT  <  2  >  =  " SUPERDUPER !  !#T&!  ! " 

933  MT  <  3 > = " GEE WH I ZGOLL YSAKE-GOOOD !#!#!" 

948  MT (4)=" DONE  LIKE  A  GENIUS!!" 

958  MT-  <  5  >  =  "  TRREEEMMENDOUUS !  !  !  *  " 

968  MT 6 > = " LOL APALUZA  SCORE!!!!" 

97S  PRINT: PRINT: PRINT  MT<R> 

988  RETURN 

1280  GT  <  F  >  =CT  <  F > :  GT  < F  + 1 }  =CT* <  F+ 1  > 

1210  X=2 

1 220  I F  ASC  <  M I  DT  <CT<F>,X,1>X  ASC  <  M I  DT  <  CT  <  F+ 1  > ,  X ,  1  >  >  THEN  1 300 
1 230  I F  ASC  <  M I  DT  <  CT  <  F+ 1 ) ,  X,  1  >  X  ASC <  M I  DT  <  CT  <  F  > ,  X ,  1  >  !>  THEN  1 290 
1240  X=X+ 1 

1250  I FX >LEN <  CT < F > )  THEN  1388 
1252  IF  X >LEN < CT < F + 1 >  >  THEN  1380 
1268  GOTO  1228 

1290  CT»'F+1  >=GT<F> :  CT<F>=GT<F+1  > 

1339  RETURN 
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How 

to  Build 

a  Program 

- BY  L.  MITCHELL  WEIN - 


Well,  the  TRS-80’s  home  and  you’ve  read  the  man¬ 
ual.  You’ve  also  played  a  few  computer  games. 
Now  what? 

Now  comes  the  big  challenge:  writing  your  own 
programs  and  controlling  that  burgeoning  tape  library. 

Before  starting  to  program,  however,  it’s  essential 
that  you  insulate  your  16K  Level  II  machine  against 
keyboard  bounce  which  can  work  havoc  with  the  edit¬ 
ing  features  used  to  correct  errors.  The  best  way  to 
prevent  keyboard  bounce  is  to  enter  one  of  two  avail¬ 
able  machine  language  programs  right  after  turning  on 
your  machine:  KBFIX,  produced  by  Radio  Shack,  or 
Microsoft’s  Level  III.  KBFIX  leaves  you  15515  bytes 
free  while  Level  III  leaves  10493  bytes  to  start.  So, 
unless  you  wish  to  use  Level  Ill’s  other  special  features 
(mainly  abbreviations,  graphics  and  line  renumber¬ 
ing),  you  should  use  KBFIX. 

Now  you’re  ready  to  begin  a  program!  It’s  best  to 
proceed  from  the  known  to  the  unknown  with  standard 
locations  for  your  program  segments.  Use  lines  1  to  19 
for  a  statement  of  the  problem  to  be  solved,  displayed 
and/or  stored;  include  your  name,  address  and  the 
date.  Revise  the  date  each  time  you  add  to  the  program. 

On  lines  20  to  299  enter  in  standard  English  all  of  the 
detailed  steps  to  resolve  your  problem.  Enter  each  step 
at  line  intervals  of  10,  writing  in  between  only  if  forced 
to  do  so.  Use  an  apostrophe  (’)  or  REM  after  every  line 
number  from  1  to  1999  to  indicate  the  lines  are  for  your 
own  use  —  not  the  computer’s. 

The  detailed  steps  are  your  logic  statements.  Include 
everything  you  can  think  of.  Always  use  the  tab  control 
(right  arrow)  to  keep  your  starting  positions  lined  up 
and  the  line  feed  control  (down  arrow)  at  the  end  of 
each  line.  Otherwise,  if  you  attempt  to  list  your  pro¬ 
gram  on  a  printer  you  may  lose  some  of  your  work. 

A  typical  sequence  of  logic  statements  which  can  be 
used  in  many  situations  is: 

20’  PRINT  HEADER 

30’  INITIALIZE  VARIABLES 

40’  DISPLAY  MENU 


50’  INPUT  DATA  FROM  TAPE 
60’  INPUT  DATA  FROM  KEYBOARD 
70’  DISPLAY  TABLE 
80’  OUTPUT  DATA  TO  TAPE 

On  lines  300  to  999  list  your  variable  definitions. 
Again,  be  as  complete  as  you  can.  If  something  occurs 
to  you  later,  be  sure  to  add  it. 

300’  VARIABLE  DEFINITIONS: 

3 10’  ML = MENU  LOCATOR 
320’  PT$=PAGE  TURNER 
330’  LN=LINE  NUMBER 

On  lines  1000  to  1999,  list  subroutine  locations, 
which  should  be  higher  than  100  times  the  highest 
logic  statement  but  lower  than  30,000.  (The  reasons 
for  this  will  become  clear  later.)  A  typical  sequence  of 
essential  subroutine  locations: 

1000’  SUBROUTINE  LOCATIONS: 

1010’  1 3000  CLR  SCREEN  AND  CENTER  CURSOR- 

LARGE  PRINT 

1020’  14000  CLR  SCREEN  AND  CENTER  CURSOR- 

SMALL  PRINT 

1030’  15000  TURN  PAGE-LARGE  PRINT 

1040’  16000  TURN  PAGE-SMALL  PRINT 

1050’  17000  PAGE  HEADER  FOR  TABLE 

1060’  1 8000  ARRAY  CALCULATIONS 

When  you  start  to  write  a  program  in  BASIC,  begin 
each  segment  at  line  locations  which  are  100  times  the 
related  logic  statement’s  location.  This  way,  you  can 
easily  flip  back  and  forth  between  logic  statements  and 
program  statements  as  required.  It  would  probably 
help  if  you  printed  or  otherwise  copied  logic  state¬ 
ments,  variable  definitions  and  subroutine  locations 
before  starting  to  write  program  statements. 

Each  subroutine  should  have  an  END  statement 
before  it.  Program  statements  for  the  subroutines  indi¬ 
cated  in  lines  1010,  1020,  1030  and  1040  are: 


12999 

END 

4000 

13000 

CLS  :PRINTCHR$(23):  PRINT:  PRINT :  PRINT : 

4010 

PRINT :  PRINT :  RETURN 

4020 

13999 

END 

14000 

CLS:  PRINT:  PRINT:  PRINT:  PRINT: 

4030 

PRINT:  RETURN 

4040 

14999 

END 

4050 

15000 

PRINT@972,“PRESS  ENTER  TO  CON¬ 
TINUE  INPUTPT  $:  C  LS :  PRINTC  H  R  $(  2  3 ) : 
LN=0:RETURN 

4060 

15999 

END 

4070 

16000 

PRINT@998,“  PRESS  ENTER  TO  CON¬ 

4080 

TINUE’ ’  ;:INPUTPT$:CLS:LN=0:RETURN 

4090 

4100 

Notice  that  the  line-feed  control  (down  arrow)  was 
used  for  lines  over  64  characters  with  text  positioned  to 
allow  easy  viewing  of  the  line  numbers. 

After  laying  out  your  problem,  logic  statements, 
variable  definitions  and  subroutine  locations  by  the  use 
of  REM  (’)  statements  on  lines  1  to  1999,  you’re  finally 
ready  to  write  the  actual  program. 

To  begin,  let’s  construct  the  header  indicated  in  line 
20  of  our  logic  statements. 

2000  GOSUB  13000:  PRINT  TAB(6)  “GREAT  PRO¬ 
GRAM”:  PRINT:  PRINT  TAB(2)  “BY  JOHN 
SMITH” 

2010  GOSUB  15000 

The  two-line  module  prints  the  header  in  the  center 
of  the  screen  using  a  32  characters  per  line  format  and 
holds  the  header  page  until  Enter  is  pressed. 

Following  the  header,  we  initialize  variables  using 
some  or  all  of  the  following  steps: 

3000  CLEAR  500  (reserve  bytes  for  string  usage) 

3010  DEFINT  A,B,C  (or  DEFDBL  and/or 
DEFSTR) 

3020  GOSUB  13000:  PRINT“ENTER  MAXIMUM”: 
PRINT“NUMBER  OF  ROWS” 

3030  INPUT  “FOR  TABLE”:  TB 

3040  DIM  XY(TB,8) 

3050  A=2:  B=20:  C=  100 

3060  CLS:  PRINT  CHR$  (23) 

The  order  in  which  CLEAR,  DEFINT  (and/or 
DEFDBL/DEFSTR)  and  DIM  are  presented  is  important. 
Any  variation  of  this  order  could  cancel  one  or  both  of 
the  latter  statements.  Lines  3020  and  3030  determine 
the  size  of  the  array  (table)  while  line  3040  establishes 
eight  columns  for  the  table.  Line  3060  turns  the  page 
and  establishes  32  character/line  format. 

The  next  module  of  our  program  is  the  MENU, 
which  is  the  most  important  part  of  any  program  as  it 
allows  the  user  to  survey  all  options  and  make  a  choice. 
In  addition,  using  the  MENU  approach  allows  you  to 
construct  separate  program  modules  as  indicated  by 
the  logic  statements.  Lines  4070, 4090  and  4 1 00  are  an 
error  trapping  routine. 


PRINT  TAB(  1 1  )“MENU”  :PRINT 
PRINT”  1 .  INPUT  DATA  FROM  TAPE.  ” 
PRINT“2.  INPUT  DATA  FROM 
KEYBOARD.” 

PRINT“3.  DISPLAY  TABLE.” 

PRINT“4.  OUTPUT  DATA  TO  TAPE.” 
PRINT“5.  END  PROGRAM.” 
PRINT:PRINT:PRINT:PRINT:PRINT:PR1NT: 
PRINT  TAB(10)  “ENTER  YOUR  CHOICE.”;: 
INPUT  M% 

IF  M%<  1  OR  M%>5  THEN  4090 
ON  M%  GOTO  5000,  6000,  7000,  8000,  9000 
GOSUB  13000:  PRINT“MENU  SELECTION 
MUST  BE  BETWEEN  1  AND  5.” 

GOSUB  1 5000:GOTO  4000 

Inputting  a  1  makes  the  program  branch  to  line  5000 
to  input  data  from  tape.  The  input  module  could  be  set 
up  as  follows: 


5000 

5010 

5020 


5030 

5040 

5050 

5060 

5065 

5070 

5080 

5090 


CLS:PRINT  CHR$(23) 

PRINT  TAB(5)“INPUT  DATA  FROM 
TAPE”:PRINT:PRINT 
PRINT“LOAD  DATATAPE.  ”: 

PRINT:  PRINT  “PRESS  ENTER  ON  KEY¬ 
BOARD.”:  PRINT:  PRINT  “PRESS  PLAY  ON 
RECORDER.  ”;:INPUT  P$ 

FOR  L%=  1  TO  TB 

FOR S%=1 TO 4 

INPUT#-  1,XY(L%,S%) 
NEXT  S% 

IF  XY(L%,  1)=0  THEN  5080 
NEXT  L% 

GOSUB  18000 

CLS:PRINT  CHR$(23):GOTO  4000 


Outputting  is  performed  by  a  subroutine  similar  in 
structure  to  the  input  routine. 


8000 

8010 

8020 


8030 

8040 

8050 

8060 

8065 

8070 

8090 


CLS:PRINT  CHR$(23) 

PRINT  TAB(5)“OUTPUT  DATA  TO 
TAPE”:  PRINT:  PRINT 
PRINT“LOAD  DATATAPE.  ” 

:  PRINT:  PRINT  “PRESS  RECORD  AND 
PLAY”:  PRINT  “ON  RECORDER”:  PRINT: 
INPUT  “PRESS  ENTER  ON  KEYBOARD.  ”;P$ 
FOR  L%=  1  TO  TB 

FOR  S%= 1  TO 4 

PRINT#-  1,XY(L%,S%) 

NEXT  S% 

IF  XY(L%,  1)=0  THEN  8090 
NEXT  L% 

CLS  .  PRINT  CHR$(23):GOTO  4000 


The  input  and  output  loops  from  5030  to  5070  and 
8030  to  8070  are  exactly  alike  except  for  the  INPUT# 
and  PRINT#  instructions.  The  similarity  is  important 
for  data  to  be  transferred  successfully  to  and  from  tape. 
In  addition,  lines  5065  and  8065  allow  exit  from  the 
transfer  loops  when  the  data  is  exhausted.  In  this  ex¬ 
ample  the  transfer  loops  only  affect  data  in  columns  1 
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to  4  of  the  table.  Line  5080  accesses  a  subroutine 
which  would  calculate  and  generate  columns  5  to  8  of 
the  table.  It  is  important  that  generated  data  not  be 
transferred  to  tape  in  order  to  maximize  tape  usage. 
The  keyboard  input  module  would  also  access  the 
same  array  calculation  subroutine. 

Having  written  a  program  and  transferred  in  to  cas¬ 
sette  tape,  we  recognize  that  the  program  will  be  use¬ 
less  if  we  don’t  know  where  to  look  for  it  in  the  future. 
Therefore,  effective  control  of  tapes  also  requires  logi¬ 
cal  steps  be  taken. 

When  dumping  programs  to  tape,  use  CSAVECHRS- 
(13);  this  allows  use  of  CLOAD  without  an  operand 
when  reloading.  Use  CLOAD?  to  verify  each  program 
after  saving  it.  If  BAD  is  printed  on  the  display  and  the 
CTR-80  stops,  you  have  a  tape  glitch.  There’s  no  need 
to  discard  the  tape,  however;  merely  note  the  turn 
location  of  the  glitch,  transfer  all  other  good  programs 
to  other  tapes  and  use  a  bulk  eraser  on  the  defective 
tape.  Future  programs  can  then  be  recorded  five  turns 
above  and/or  below  the  glitch. 

Programs  should  be  recorded  at  least  twice  and  kept 
in  a  minimum  of  two  locations.  One  location  could  be 
an  open  container  attached  to  a  wall  for  easy  access; 
but  the  other  should  be  a  closed  metal  box  tucked  away 
from  disturbance  in  a  drawer.  Both  locations  should  be 
at  a  safe  distance  from  the  computer  power  supply, 
video  display  and  television  sets. 

Keep  the  tape  recorder  on  the  opposite  side  of  the 
keyboard  from  the  power  supply  and  video  display. 


The  recorder  should  be  cleaned  every  second  day 
with  “Head  Cleaner  and  Demagnetizer’’  and  every 
second  week  with  “Tape  Recorder  Cleaner  and  Lubri¬ 
cant”,  both  by  Realistic. 

When  you  purchase  a  new  cassette,  number  it  and 
mark  the  sides  A  and  B.  Test  each  tape  for  number  of 
turns,  then  rewind  and  bulk  erase. 

An  essential  part  of  tape  control  is  maintaining  an 
accurate  program  location  log.  Paper  suitable  for  this 
log  is  4  column  accounting  paper,  which  also  has 
columns  for  dates  and  descriptions.  Use  two  columns 
for  each  cassette,  labelled  side  A  or  side  B.  Above  the 
labels  should  be  the  cassette  identification  data:  con¬ 
tainer  #;  cassette  #;  cassette  turns.  Each  program  line 
entry  should  contain  date;  description/record  character 
(Level  —  I,  II,  III;  machine  language  —  ML;  data  — 
D);  scratch  status  (X=scratched-erased);  starting  turn 
location  and  ending  turn  location.  □ 


Date 

1979  Descrip. /Char. 

4/14  Pge  Separator/ll 
4/30  Change  of  D 1  r/I 
5/10  Marks/D 


1/Cassette#7(  1 1 1)  2/Cassette#8<  198) 
A  BAB 

005-011 
X  005-020 
016-031 


Editors  Note:  Microsoft  Level  III  is  available  from 
local  computer  stores  or  may  be  purchased  for  $49.95 
directly  from  Microsoft  Consumer  Products,  10800 
N.E.  Eighth,  Suite  819,  Bellevue,  WA  98004;  (206) 
454-1315.  KBFIX  is  available  at  Radio  Shack  Stores. 


It’s  in  the  bag. 

What  is? 

The  biggest  and  best  selection  of  microcomputer 
software  anywhere.  And  the  list  grows  bigger  daily. 

CP/M  configured  for  the  most  popular  8080/Z-80 
microcomputer  systems  and  other  terrific  software.  Full 
support  for  disk  computer  systems  such  as  North  Star, 
Vector  MZ,  Heath  H17/H89,  Exidy,  Altair,  Imsai,  iCom,  Helios, 
OSI*C3,TRS*80  and  many  others.  Languages  such  as 
FORTRAN,  Algol,  C,  COBOL  and  BASIC.  Word  Processing 
and  Accounting  systems.  Call,  write  for  latest  literature. 

Lifeboat  Associates,  2248  Broadway, 

New  York,  N.Y.  10024,  U.S.A. 

Telephone:  (21 2)  580-0082  Telex:  668585 


Verbatim 

FLOPPY  DISKETTES 

51/*”  ONLY  $26* 

10  FOR  $3.25  ea.  50  FOR  $3.00  ea. 

8”ONLY$3^sea 

10  FOR  $3.80  ea  50  FOR  $3.55  ea 


SEND  FOR  OUR  FREE  ELECTRONIC  & 
COMPUTER  PRODUCTS  CATALOG 


SPECIFY  DISKETTE  TYPE  &  COMPUTER 

5  Vi”  Soft  Sector,  10  sector,  16  sector 
8”  IBM  Compatible,  Hard  Sector 


CALL  24  HRS.  TOLL  FREE  TO  ORDER 


NATIONAL  800-824-7888 
CALIF.  ONLY  800-852-7777 
ALASKA  &  HAWAII  800-824-7919 
ASK  FOR  OPERATOR  702 


VISA,  MASTERCHARGE  OR  C.O.D. 

SEND  CHECK,  SAVE  C.O.D.  FEES 


SOFTWARE  &  COMPUTER  PRODUCTS 

A  subsidiary  of  OataComm  Interface  Systems 

POST  OFFICE  BOX  503 
SAN  BRUNO,  CA  94066 
(415)  348-2387 
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TRS-80 

Line 

Renumbering 

- BY  BLAKE  WARD - 


I  was  writing  one  day  when  I  found 
that  unless  I  changed  some  line 
numbers  I  needed  a  line  numbered 
88.5.  Since  I’m  too  cheap  to  buy  Radio 
Shack’s  renumbering  program,  I  sat 
down  and  wrote  one  myself. 

The  program,  shown  in  Program 
Listing  1 ,  is  executed  by  typing  “RUN 
60000”.  It  asks  for  the  starting  line  and 
the  interval  between  each  line,  and  pro¬ 
ceeds  to  renumber  your  program, 
changing  line  numbers  and  all  the 
GOTOs,  GOSUBs  and  THENs.  Renum¬ 
bering  can  take  a  long  time  (sometimes 
more  than  one-half  hour),  depending 
on  the  length  of  your  program.  The 
reason  will  become  apparent  as  I  ex¬ 
plain  how  the  program  works. 

When  the  program  states  ENTER 
STARTING  LINE,  INCREMENT,  enter 
the  new  starting  line  number  and  the 
increment  size,  separated  by  a  comma. 
The  program  will  check  to  see  if  the 
numbers  entered  would  produce  line 
numbers  greater  than  60000  (which 
would  be  fatal  for  your  program).  Con¬ 
flicting  line  numbers  result  in  the  pro¬ 
gram  requesting  input  again.  If  this 
should  happen,  either  one  or  both  of  the 
input  numbers  should  be  decreased. 

After  the  line  numbers  have  been  al¬ 
tered  you  will  see  LINES  CHANGED 
NOW  CORRECTING  GOTO,  GOSUB, 
ETC.  while  the  program  piakes  the 
changes.  You  might  as  well  get  a  cup  of 
coffee  or  watch  TV  because  if  your 
program  is  long  it  will  take  a  while. 
When  the  program  prints  FINISHED, 
you  must  type  DELETE  60000-60350 


Program  Listing  1 

60000  AA=PEEK(l6548)+PEEK(l6549)*256:  AB=AA:  AC=AA:  V=0:  REM  LINE 

RENUMBERING  PROGRAM  BY  BLAKE  WARD,  OXBOW,  3 ASK,  CANADA:  TO  EXECUTE 

TYPE  'RUN  60000 '  NOTE:  DON"'  REMOVE  THIS  REM  STATEMENT - 

60010  AC=PEEK(AC)+PEEK(AC+1)*256:  V=V+1 :  IF  PSEK(AC+2)+PEEK(AC+3)*256<>60000 
THEN  60010  ELSE  DIM  LL(V):  Y=0 

60020  INPUT  "ENTER  STARTING  LINE,  INCREMENT" t  LI ,  L2 :  L3=L1:  IF  L1+L2*(V-1 )= >60000 
THEN  60020 

60030  FOR  X=  0  TO  3:  A (X)=PEEK(AA+X) :  NEXT:  N=A (3)*256+A (2) :  IF  N=60000 
THEN  60060 
60040  LL(Y)-N:  Y=Y+1 

60050  R=INT(Ll/256):  RR=L1-R*256:  L1=L1+L2:  POKE  AA+2,RR:  POKE  AA+3.R:AA= 
A(0)+A(l)*256:  GOTO  60030 

60060  PRINT  "LINES  CHANGED,  NOW  CORRECTING  GOTO,  GOSUB,  ETC.":  AA=AB-1:  Y=Y-1: 
H=PEEK(A!0)+A(1 j*256)+PEEK(A(0)+A(l)*256+l)*256i  POKE  16548, K-INT(H/256)* 
256:  POKE  16^49,  INT(H/256) 

O0070  AA-AA+4:  IF  PEEK(AA ) *256+ PEEK  (AA-1 )=60000  THEN  PRINT  "FINISHED": 

POKE  16548, AB-INT(AB/256)*256:  POKE  16549, INT(AB/256 ) :  END 
60080  AA=AA+1 :  C=PEEK(AA):  IF  0=0  THEN  60070  ELSE  IF  COl4l  AND  0<>145  AND 
CO  149  AND  00159  AND  00202  THEN  60080 
60090  AZ=AA 

60100  AA=AAfl:  C=PEEK(AA) :  IF  C=32  THEN  60100 

60110  IF  04?  AND  C<58  THEN  GOSUB  60140:  GOTO  60100 

60120  IF  LN$~  THEN  60080  ELSE  IF  C=44  THEN  GOSUB  60150:  GOTO  60090 

60130  OS  13  60150:  IF  C=0  GOTO  6 0070  ELSE  60080 

60140  LN=C-48 :  LN$=LN$+RIGHT$(3TR$(LN) , 1 ) :  RETURN 

60150  Z=-l :  LN=VAL(LN$):  FOR  X=0  TO  Y:  IF  LL(X)=LN  THEN  Z=X:  X=Y 

60160  NEXT:  IF  Z=-l  THEN  PRINT  "COULDN'T  FIND";LN;"IN  TABLE":  GOTO  60230 

601?0  NL=L2*Z*rL3:  NL$=STR$(NL) :  NL$=RIGHT$(NL$,  LEN (NL$)-t )  * 

60180  IF  LEN(NL$>  AA-AZ-1  THEN  60240 

60190  IF  LEN (NL$ )<AA-AZ-1  THEN  NL$=NL$+"_":  GOTO  60190 

60200  FOR  X=AZ+1  TO  AA-1:  LN|=MID$(NL$ , X-AZ, 1 ) :  LN=VAL(LN$)+48:  POKE  X,LN 

60210  IF  LN$=”  "  THEN  POKE  X.32 

Continued 


60220  NEXT 

60230  LN$="" f  RETURN 

60240  M=AA :  AA=AA+1 :  B=PEEK(M):  IF  B=0  THEN  3=32:  GOTO  60270 
60250  Bl=PSEK(M+l):  IF  B1=0  THEN  60280 
60260  POKE  M+l ,  B:  B=B1 :  M=M+1 :  GOTO  60250 
60270  M=M-1 

60280  J=PEEK(M+3)*256+PEEK(M+2):  B2=PEEK(M+4) :  B3=PEEK(M+5) :  IF  B3*256+ 

B2<>  60000  THEN  J=J+1 

60290  POKE  M+l ,  B:  POKE  M+2,0:  POKE  M+3, J-TNT(j/256)*256:  POKE  M+4,INT(j/256) : 
B=PEEK(M+6) :  POKE  M+5.B2:  POKE  M+6.B3*.  K=M+6:  IF  B3*256+B2<  >60000 
THEN  60250 
60300  M=AA 

60310  IF  PEEK(M)<>0  '"HEN  M=M+1 :  GOTO  60310 

60320  W=PEEK(M+4)*256+PEEK(M+3)-L2:  M=AA:  IF  W=59990  THEN  W=L3+L2*(V-l) 

60330  IF  PEEK(M)*256+PEEK(M-1)<>W  THEN  M=M-1:  GOTO  60330 

60340  tf=PEEK(M-2)*256+PEEK(H-3)+l:  POKE  M-2,INT(W/256) :  POKE  M-3,W-INT(W/256)* 
256:  GOTO  60180 

60350  RSM  COPYRIGHT  1979  BY  BLAKE  WARD  ALL  RIGHTS  RESERVED 


Program  Listing  2 

10  CIS :  PRINT  PEEK(l6548); "__m; PEEK (l 6549):  B=PEEK ( 1 6548 ) +PEEK ( 1 6549 ) *256 

20  0=B:  B=PEEK(D+1  )*256+PEEK(D) :  IF  B>0  GOTO  20 

30  POKE  1 6548 , D- IN T ( D/256 ) * 256 :  POKE  16549, INT(D/256) :  END 


(Enter),  which  erases  the  renumber 
program  itself.  You  can  then  do  what¬ 
ever  you  want  with  your  program,  such 
as  save  it  on  tape  or  finish  writing  it. 

The  biggest  disadvantage  of  writing 
a  renumbering  program  in  BASIC  is  that 
you  must  either  load  it  before  you  type 
in  your  program,  or  you  must  type  it  in 
each  time  you  wish  to  use  it.  Not  so 
with  this  program!  Program  Listing  2 
contains  a  short  program  to  allow  merg¬ 
ing  the  renumbering  program  from  tape 
with  the  program  in  memory.  Type  in 
Listing  2,  changing  the  line  numbers  to 
whatever  is  convenient.  Run  this  short 
program  and  make  a  note  of  the  two 
numbers  which  appear  on  the  screen. 
Then  CLOAD  the  renumbering  program 
as  usual.  When  the  renumbering  pro¬ 
gram  has  finished  loading,  type  POKE 
16548, XX:  POKE  16549, YY  where 
XX  is  the  first  number  that  was  dis¬ 
played  on  the  screen  and  YY  the  second 
number.  You  will  now  have  both  pro¬ 
grams  in  memory  just  as  if  you  had 
typed  them  in. 

To  understand  how  the  program 
works,  let’s  see  how  Radio  Shack’s 
Level  II  stores  BASIC  language  pro¬ 
grams  in  memory. 

Under  normal  circumstances,  a  pro¬ 
gram  is  stored  in  memory  starting  at 
location  17129  (or42E9  hexadecimal). 
Each  line  is  stored  in  the  following 
manner:  The  first  two  bytes  are  the  ad¬ 
dress  of  the  beginning  of  the  next  line  of 
the  program,  allowing  BASIC  to  “hop” 
through  memory  without  scanning  each 
line’s  text.  Next  are  two  bytes  which 
represent  the  current  line  number  in 
hexadecimal:  the  first  byte  plus  the  sec¬ 
ond  byte  times  256  equals  the  line 
number  in  decimal  form.  Following  the 
first  four  bytes  is  the  actual  line  text 
stored  in  ASCII  (A=65,  B=66,  etc.). 
All  BASIC  keywords  are  stored  in  a 
special,  compressed  format  to  save 
memory  (GOTO=141,  GOSUB=145, 
PRINT=  178).  At  the  end  of  the  text  is  a 
00  which  signifies  end  of  line.  The  end 
of  the  program  is  represented  by  three 
00s,  in  other  words,  the  address  of  the 
next  line  of  program  is  0000  (there  isn’t 
one!). 

The  first  line  of  the  renumbering 
program  finds  where  the  program  be¬ 
gins  (usually  17129).  Line  60010 
counts  the  number  of  lines  in  your  pro¬ 
gram  and  DIMensions  the  array  (LL)  to 
that  amount.  Line  60020  asks  for  the 
starting  line  and  increment  and  checks 
to  see  if  they’re  too  large.  Lines  60030 
through  60050  scan  your  program, 
placing  the  old  line  number  in  the  array 
(LL)  and  replacing  it  with  the  new  line 


number  (LI).  It  adds  the  increment 
(L2)  to  LI  and  hops  to  the  next  line. 
Line  60030  checks  to  see  if  it  has 
reached  the  end  of  your  program;  if  it 
has,  the  program  jumps  to  line  60060. 
You  can’t  renumber  the  renumbering 
program. 

Radio  Shack’s  BASIC  executes 
GOTOs  and  GOSUBs  by  starting  at  the 
beginning  of  the  program  and  hopping 
from  line  to  line  until  it  reaches  the 
proper  line.  In  line  60060,  we  play  a 
trick  on  BASIC  by  changing  memory 
locations  16548  and  16549,  which  con¬ 
tains  the  starting  address  of  the  pro¬ 
gram.  The  ruse  is  necessary  because  the 
next  part  of  the  renumbering  process 
shifts  your  program  ahead  in  memory 
and  if  BASIC  tries  to  hop  through  your 
program  to  get  to  the  renumbering  pro¬ 
gram,  it  can  become  confused  and  for¬ 
get  most  of  your  program  and  all  of 
the  renumbering  program.  To  avoid 
catastrophe  we  make  BASIC  think  the 
only  program  in  memory  starts  at  line 
60000.  Line  60070  puts  the  locations 
back  once  the  changes  have  been  made 
and  it’s  safe  to  hop  through  your  pro¬ 
gram  again. 

Line  60080  checks  each  byte  to  see  if 
that  byte  is  one  of  the  BASIC  keywords 
such  as  GOTO  or  GOSUB;  if  not,  1  is 
added  to  AA  (which  keeps  track  of  the 


current  memory  location)  and  the  next 
byte  is  checked. 

Lines  60100  to  60230  load  the  old 
line  number  into  LN$,  look  it  up  in  the 
array  and  put  the  new  line  number  in 
NL$.  Line  60180  checks  to  see  if  the 
new  line  number  has  more  digits  than 
the  old  number.  If  it  does,  the  program 
branches  to  line  60240. 

Lines  60240  to  60340  move  the  re¬ 
mainder  of  the  program  ahead  in 
memory  one  space  to  make  room  for 
the  new  line  number.  Each  time  part  of 
the  program  is  moved  ahead  one  space, 
it  is  allowed  to  overlap  onto  the  first 
line  of  the  renumbering  program  which 
isn’t  needed  anymore.  For  this  reason 
the  renumbering  program  must  be 
loaded  each  time  you  want  to  use  it.  If 
you  remember,  at  the  start  of  each  line 
of  program,  the  address  of  the  next  line 
is  stored.  Since  all  the  lines  following 
the  line  number  being  corrected  have 
been  moved  ahead  in  memory  one 
space,  these  addresses  must  increase  by 
one.  After  shifting  the  program  ahead 
in  memory  and  correcting  the  line  ad¬ 
dresses,  the  program  jumps  back  to  line 
60 1 80  to  see  if  there  is  enough  room. 

Line  60200  puts  the  new  line  number 
into  our  program.  Each  time  the  end  of 
a  line  is  reached,  line  60070  adds  four 
to  AA  to  jump  over  the  four  bytes  of 


information  at  the  start  of  a  line.  Line 
60070  also  checks  to  see  if  the  next  line 
is  60000  which  would  mean  all  of  your 
program  has  been  renumbered.  If  this  is 
the  case,  the  line  corrects  memory  loca¬ 
tions  16548  and  16549  and  the  program 
ends. 

The  part  of  the  renumbering  program 
that  takes  most  of  the  time  is  the  section 
that  shifts  the  program  ahead  in  mem¬ 
ory  (lines  60240  to  60340).  One  way 
the  program  could  be  made  faster 
would  be  to  write  it  in  assembly  lan¬ 
guage,  or  to  call  a  machine  language 
subroutine  (using  USR)  to  do  the  slow¬ 
est  part  of  the  program.  A  machine  lan¬ 
guage  subroutine  would  take  a  fraction 
of  the  time  used  by  BASIC. 

Short  of  rewriting  the  program  in 
assembly  language,  there  is  a  change 
that  could  make  it  easier  to  use.  After 
the  program  has  been  running  for  fif¬ 
teen  minutes  or  so,  you  can't  help  won¬ 
dering  whether  it  is  working  right  or  if  it 
is  in  an  endless  loop.  One  way  to  tell  if 
the  program  is  working  would  be  to 
display  the  number  of  the  line  as  it  is 
completed. 

To  display  line  numbers,  add  the  fol¬ 
lowing  line  to  the  program: 

60075  CLS:  PRINT  (a  512,  “CORREC¬ 


TION  IS  COMPLETED  FOR ’  ;P;“OUT 
OF";V-l;“LINES":P=P+  1. 

The  new  line  will  cause  the  program  to 
display  the  line  just  completed  and  the 
total  number  of  lines  in  your  program. 

When  you  type  in  the  renumbering 
program  it  is  a  good  idea  to  store  it  on 
tape  or  diskette  before  using  it  because 
a  typing  mistake  could  cause  the  re¬ 
numbering  program  to  erase  itself. 
Another  suggestion  is  to  use  it  on  a 
short  program  first  because  typing  er¬ 
rors  could  cause  your  original  program 
to  be  erased.  When  I  tested  the  program 
after  typing  it,  I  stored  a  copy  on  tape 
and  typed  in  a  few  lines  like:  3  GOTO  3, 
8  ON  X  GOSUB  3,8,47  and  47  IF  X=0 
THEN  3.  The  test  lines  don't  have  to  be 
part  of  a  program  but  they  must  be 
correct.  You  can  test  the  program  with¬ 
out  wasting  much  time  or  losing  a  pro¬ 
gram  you  spent  hours  typing  in! 

The  renumbering  program  works 
equally  well  in  Disk  Basic.  I  have  a 
copy  on  diskette  in  ASCII  format  so  that 
I  can  use  the  Merge  command  to  add  it 
to  another  program  in  a  matter  of 
seconds. 

I  hope  this  program  adds  to  the  en¬ 
joyment  you'll  get  from  computer.  At 
the  very  least,  it  should  make  things  a 
little  easier.  □ 


THE 

SMART  TERMINAL 

SOFTWARE  PACKAGE  FOR  THE 


TRS-80 


TRUE  BREAK  KEY 
AUTO  REPEAT  KEYS 
PROGRAMMABLE  SOFT’  KEYS 
MULTIPAGE  SCROLLING  DISPLAY 
FULLY  CONFIGURED  FROM 
KEYBOARD 

DUAL  DIAGNOSTIC  DISPLAY  MODE 
SHOWS  CONTROL  CHARACTERS 
MULTI  PROTOCOL  CAPABILITY 
GRAPHIC  CHARACTERS 
GENERATED  FROM  KEYBOARD 
TRANSMIT  SCREEN.  PRINT  SCREEN 
TRANSMIT  FILE,  RECEIVE  & 
CREATE  DISK  FILE 
FLEXIBILE  I/O  LINKAGE 
CAPABILITY 

DISPLAY  AND  KEYBOARD  DRIVERS 
CAN  BE  USED  UNDER  DOS 
WRITTEN  FOR  DISK  SYSTEMS  NOT 
ADAPTED  TO  THEM. 

•  $79.95 


MICRON,  INC. 

10045  Waterford  Dr. 
Ellicott  City,  MD  21043 
(310)  461-2721 
MC/VISA  accepted 


Now  available:  SPOOL-SO 

•  PRINT  YOUR  LISTING 
WHILE  RUNNING 
OTHER  PROGRAMS. 
(DISK  SYSTEMS  ONLY.) 
$39.95 
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TRS  MOD  I  and  MOD  II  PROGRAMS  FROM  i  RACET  COMPUTES 


oo  BASIC  for  Level  II  and  Disk  Systems  $49.95 

Full  MATRIX  Functions  -  30  BASIC  commands! ! 

Mathematical  and  common  matrix  functions.  Change  arrays  in 
mid-program.  Complete  array  handling.  Tape  array  read  and  write, 
including  strings.  Common  subroutine  calls. 

Over  50  more  STRING  Functions  as  BASIC  commands!!  String 
manipulation,  translation,  compression,  copying,  search,  screen 
control,  pointer  manipulation  and  utility  functions.  Includes 
multikey  multivariable  machine  language  sorts.  Load  only  machine 
language  functions  that  you  want!  Where  you  want  in  memory! 
Relocating  linking  loader!  More  than  you  ever  expected!! 

oo  BUSIN  ESS  (Requires  Infinite  BASIC)  $29.95 

20  Business  orientea  runctions  including: 

Printer  Automatic  Pagination  with  headers  and  footers! 

Packed  Decimal  Arithmetic  (  +  ,-,*,/)  127  digits! 

Binary  array  searched  and  hash  code  generator! 

COMPROC  Command  Processor  for  Disk  Systems  $19.95 

Auto  your  disk  to  perform  any  sequence  of  DOS  commands, 
machine  language  loads,  BASIC,  memory  size,  run  program, 
respond  to  input  statements,  etc.  Single  BASIC  command  file 
defines  execution!  Includes  auto  key-debounce,  screen  print  and 
lower  case  software  driver. 

New  Products  Jan/Feb!  We  answer  reader  response  inquiries! ! 

ATTN /  System  Houses  -  We  license  usage  of  our  routines! 

TRS  Add-On  OEM’s  -  Direct  BASIC  commands  tailored 
for  your  hardware. 


REMODEL  +  PROLOAD  Specify  16,  32,  or  48K  Memory  $34.95 

RENUMBER  any  portion  or  all  of  BASIC  program.  Line  references 
adjusted. 

MOVE  any  portion  of  a  BASIC  program  from  one  location  to 
another. 

DELETE  lines  or  ranges  of  lines  while  using  the  utility. 

MERGE  all  or  any  portion  of  a  program  from  tape.  (Load  lines 
300-500  from  your  tape  to  existing  program  at  line  1000  with 
renumbering  on  the  way  in!) 

SAVE  combined/merged  programs,  or  any  portion  to  tape  with 
VERIFY. 

COPSYS  Copy  Systems  Tapes  (Editor/Assembler  Format)  $14.95 
GSF  (16,  32,  or  48K)  $24.95 

18  Machine  language  routines  using  ‘USR’  calls.  Includes  RACET 
sorts,  array  handling,  and  fast  lines  and  scrolls. 

DOSO  RT  (Specify  32  or  48K  •  2  disk  minimum)  $34.95 

Sort/Merge  multi-diskette  sequential  files.  Multiple  keys  and 
variables.  Includes  GSF  -  machine  language  sorts,  comparators 
and  string  handling. 

MOD  II  SUPPORT 

RACET  is  supporting  the  MOD  II!! 

Call  or  write  for  current  information!  We  have  a  MOD  II  Superzap 
and  other  assembly  language  tools! 

Ask  your  dealer  if  he  carries  our  products! 

DEALERS!  We  will  work  with  you  directly  or  through  our 
distributors. 


CHECK,  VISA,  M/C,  C.O.D.  •  Calif.  Residents  add  6%  •  Telephone  Orders  Accepted  (714)  637-5016 

WHEN  ORDERING  PLEASE  ADVISE  PUBLICATION  SOURCE 


|-  RACET  COMPUTES  “zj 
702  Palmdale,  Orange  CA  92665 
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A  Beautiful 
Way  To  Interface 


itmwJLi 


1  IQ  120  is  the  result 

at  a  low  affordable  price. 
The  IQ  120  terminal  is  a  simple 
self-contained,  operator  /  computer  unit. 

The  IQ  120  offers  such  features  as:  1920  character 
screen  memory,  lower  case,  RS232C  extension, 
switch  selectable  transmission  rates  from  75  to 
19.200  bps,  cursor  control,  addressable  cursor,  erase 
functions  and  protect  mode.  Expansion  options  presently 
available  are:  block  mode  and  hard  copy  capability  with 
printer  interface.  The  IQ  120  terminal  incorporates  a  12-inch, 
CRT  formatted  to  display  24  lines  with  80  characters  per  line. 


SOROC's  first 
and  foremost 
concern,  to  j 
design  outstanding 
remote  video  displays,  has 
resulted  in  the  development 
of  the  IQ  140.  This  unit 
reflects  exquisite  appearance 
and  performance  capabilities 
unequaled  by  others  on  the  market. 

With  the  IQ  140,  the  operator 
is  given  full  command  over  data 
being  processed  by  means  of  a  wide  variety 
of  edit,  video,  and  mode  control  keys.  etc. 

The  detachable  keyboard,  with  its 
complement  of  117  keys,  is  logically 
arranged  into  6  sections  plus  main  keyboard 
to  aid  in  the  overall  convenience  of  operation. 

For  example,  a  group  of  8  keys  for  cursor  control  / 

14  keys  accommodate  numeric  entry  / 16  special  function  keys 
allow  access  to  32  pre-programmed  commands  /  8  keys  make 
up  the  exterjsive  edit  and  clear  section  /  8  keys  for  video  set 
up  and  mode  control  /  and  8  keys  control  message  and  print. 

Two  Polling  options  available:  1 )  Polling  compatible  with  Lear 
Siegler’s  ADM-2.  2)  Polling  discipline  compatible  with  Burroughs 


IQ  140 


IBS  FREEDOM  AVE.,  ANAHEIM,  CALIF.  95801 

(714)  998-2860  /  (800)  B54>Q147 


fsOROC 

^/TECHNOLOGY,  INC. 
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STONEHENGE 


BY  BONNIE  J.  AND  DAVID  J.  BEARD 


Stonehenge  —  a  mysterious  structure  of  massive  stones 
on  Salisbury  Plain  in  England  —  now  stands  sadly 
dilapidated  after  four  millennia  of  weather,  war  and  vandal¬ 
ism.  The  question  of  who  built  it  and  why  has  generated  a  lot 
of  interest  and  controversy  over  the  centuries.  More  than 
one  person  guessed  that  Stonehenge  was  used  as  temple- 
observatory.  But  recent  studies,  made  possible  by  modem 
computers,  suggest  that  it  is  a  much  more  sophisticated 
machine  than  anyone  had  ever  supposed. 

Many  of  the  functions  embodied  in  the  design  of  Stone¬ 
henge  lend  themselves  neatly  to  implementation  on  a  small 
computer.  Experimenting  with  these  functions  can  provide 
valuable  insights  into  astronomy,  programming  techniques 
and  Stonehenge  itself. 

Stonehenge  is  shaped  something  like  a  large  skillet  (Figure 
1),  outlined  by  chalk  banks.  The  circular  body,  100  meters 
in  diameter,  encloses  the  well-known  standing  stones. 

The  “handle”  is  an  avenue  pointing  to  the  northeast  in 
the  direction  of  midsummer  sunrise.  Within  the  bank  is 
a  circle  of  56  evenly  spaced  Aubrey  holes,  named  for 
John  Aubrey,  who  reviewed  Stonehenge  for  his 
king  in  the  1660s.  These  holes  have  been  refilled 
with  chalk  to  serve  as  markers  or  calibrations 
Inside  the  ring  of  Aubrey  holes  is  a  circle  of  30 
sarsen  stones  capped  with  lintels,  and  in  the 
center  of  the  structure  are  the  five  great  tri- 
lithons  arranged  in  a  horseshoe. 

Many  people  have  speculated  about  who 
built  Stonehenge  and  why.  Some  thought 
Merlin  transported  the  stones  from  Ireland  and 
erected  the  monument  to  British  dead.  Others  O 

thought  it  might  have  been  a  temple  built  by  the 
Romans,  or  a  royal  court  of  the  Danes,  or  a  Druid  O 

temple.  In  the  1740s,  Dr.  William  Stukeley  was  O 

the  first  writer  to  mention  the  avenue  and  the  fact 
that  the  entire  structure  lines  up  to  the  northeast  and 
the  midsummer  sunrise.  For  the  last  five  hundred  years, 
the  Druids  have  been  the  most  popular;  people  liked  to 
envision  bloody-handed  priests  making  human  sacrifices 
and  chanting  mystical  nonsense  to  the  Moon. 


Today’s  best  guess  is  that  Stonehenge  was  started  around 
2000  B.C.  and  built  over  a  period  of  three  centuries,  with 
many  modifications  and  additions.  It  was  first  laid  out  by  a 
neolithic  agricultural  people,  primarily  as  an  astronomical 
observatory  used  to  synchronize  their  calendar  with  the 
seasons.  Modem  man  takes  an  accurate  calendar  for  granted, 
but  determining  the  time  of  year  was  a  difficult  problem  in 
ancient  England,  where  fog  and  rain  obscured  the  sky 
for  months  at  a  time.  It  was  also  a  matter  of 
vital  importance;  a  village  lured  into  plant¬ 
ing  before  the  last  of  the  deep  frosts 
might  literally  starve  the  next  winter. 
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Figure  1 

Ground  Plan  of  Stonehenge 


The  location  of  Stonehenge  is  significant.  The  Salisbury 
Plain  was  considered  holy  long  before  Stonehenge  was 
erected.  There  are  an  unusually  large  number  of  barrow 
burials  in  this  area  and  artifacts  found  there  suggest  that  the 
plain  was  also  a  site  for  trade  fairs  and  religious  festivals. 
There  was  probably  a  resident  priesthood  there  before  Stone¬ 
henge  was  built.  History  and  literature  hint  that  these  priests 
were  not  only  religious  leaders  but  also  teachers,  doctors  and 
respected  authorities  on  many  practical  subjects.  In  fact,  the 
nearest  equivalent  today  to  Stonehenge  might  well  be  a 
modem  state  agricultural  college,  complete  with  fairs,  fes¬ 
tivals  and  football  games. 

Many  archaeologists  doubted  that  Stonehenge  was  ever 
used  as  an  observatory,  arguing  that  primitive  people  would 
not  have  so  sophisticated  a  knowledge  of  astronomy.  Most  of 
these  doubts  were  dispelled  in  1963  by  Gerald  Hawkins. 
Using  an  IBM  7090  computer  at  Harvard  College  Observa¬ 
tory,  Hawkins  systematically  searched  for  alignments  be¬ 
tween  key  stations  at  Stonehenge  and  significant  Sun  and 
Moon  positions.  He  expected  to  find  some  correlation,  but  he 
was  astonished  at  the  number  and  accuracy  of  the  alignments 
he  found. 

The  use  of  Stonehenge  as  a  giant  astrolabe  is  beyond  the 
scope  of  this  article,  but  it  should  be  noted  that  many 
unrelated  sighting  lines  were  combined  into  a  simple, 
elegant,  symmetrical  structure  —  an  intellectual  feat  of  no 
mean  order. 

Soon  afterward,  teased  by  historical  references  to  some¬ 
thing  significant  that  happened  at  Stonehenge  every  18  or  19 
years,  Hawkins  wondered  if  the  builders  of  Stonehenge 
might  have  been  predicting  eclipses.  As  we  will  see  later,  56 
is  a  very  important  number  to  anyone  interested  in  eclipses. 
There  were  exactly  56  Aubrey  holes,  and  it  is  not  easy  or 
convenient  to  divide  a  circle  into  56  equal  sectors.  He  also 
noted  the  correspondence  between  the  29.5  day  lunar  month 
and  the  30  stones  and  29  arches  of  the  sarsen  circle. 

Machine  analysis  had  shown  that  Stonehenge  was  an 
accurate  astronomical  instrument.  Hawkins  wondered  if  it 
was  also  a  sort  of  neolithic  computer,  where  men  used  integer 
mathematics  to  track  the  wanderings  of  the  Sun  and  Moon.  A 
decade  later  Fred  Hoyle  elaborated  on  Hawkin’s  work,  sug¬ 
gesting  a  simpler  and  more  comprehensive  method  of  operat¬ 
ing  the  Stonehenge  computer.  The  model  and  method  of 
operation  presented  here  are  borrowed  primarily  from 
Hoyle’s  book. 

Figure  2  shows  a  simple  Earth-centered  model  of  the 
universe  as  seen  from  somewhere  above  the  northern  hemi¬ 
sphere.  The  Earth  is  rotating  counter-clockwise  once  each 
day.  Its  axis  of  rotation  is  always  tilted  towards  the  North 
Star.  The  Sun  and  Moon  travel  counter-clockwise  around 
circular  paths,  the  Sun  taking  one  year  for  a  full  circuit,  the 
Moon  taking  27.32  days.  The  Moon’s  orbit  is  tilted  slightly 
with  respect  to  the  Sun’s.  The  points  where  the  Sun’s  and 
Moon’s  orbits  cross  are  the  nodes  of  the  Moon.  These  nodes 
are  not  stationary  but  drift  slowly  clockwise,  making  a  full 
circuit  in  18-2/3  years,  or  3  circuits  in  56  years.  Beyond  the 


Sun  and  Moon  are  the  immovable  stars,  providing  a  fixed 
reference  for  measuring  the  various  movements. 

Because  the  Earth  is  rotating  much  more  quickly  than  the 
Sun  and  Moon,  an  observer  in  the  Northern  Hemisphere  will 
see  the  Sun  and  Moon  rise  on  his  left,  travel  clockwise  across 
the  sky,  and  set  on  his  right.  However,  each  day  the  Sun  and 
Moon  will  have  drifted  slightly  counter-clockwise  against 
the  background  of  stars.  Although  very  simple,  this  model  of 
the  cosmos  can  explain  and  predict  the  seasons,  the  phases  of 
the  Moon,  the  time  of  moon  rise,  and  the  patterns  of  the 
ocean’s  tides  and  the  occurrence  of  solar  and  lunar  eclipses! 
If  Stonehenge  was  used  to  implement  this  model,  we  can 
understand  why  so  much  construction  effort  was  justified. 

Look  at  Figure  2  again.  When  the  Sun  lies  in  the  direction 
of  the  North  Star,  the  Northern  Hemisphere  is  tilted  toward 
the  Sun.  The  Sun  will  appear  high  in  the  sky  and  it  will  be 
summer.  When  the  Sun  lies  opposite  the  North  Star,  appear¬ 
ing  low  in  the  sky,  it  will  be  winter.  When  the  Sun  stands 
highest  in  the  sky,  it  is  the  summer  solstice,  or  midsummer’s 
day  (solstice  is  simply  Latin  for  “the  sun  stands”). 

When  the  Sun  and  Moon  are  on  opposite  sides  of  the  Earth, 
the  entire  earthward  side  of  the  Moon  is  lighted,  and  it  is  full 
moon.  The  Moon  will  rise  and  set  exactly  twelve  hours 
behind  the  Sun  and  stand  directly  overhead  at  midnight. 
When  the  Sun  and  Moon  lie  at  right  angles,  the  Moon  is 
lighted  from  one  side.  We  see  a  half-moon,  and  the  Moon 
rises  and  sets  six  hours  before  (when  waning)  or  after  (when 
waxing)  the  Sun.  When  the  Sun  and  Moon  lie  in  the  same 
direction,  the  far  side  of  the  Moon  is  lighted  and  our  side  is 
dark.  It  is  new  moon.  The  Sun  and  Moon  will  rise  and  set 
together,  and  the  thin  faint  crescent  of  the  new  moon  will  be 
lost  in  the  Sun’s  glare. 

Tides  are  caused  by  the  gravitational  pull  of  the  Sun  and 
Moon  on  the  waters  of  the  oceans.  The  Moon  has  a  much 
stronger  effect  than  the  Sun,  and  there  will  always  be  a  high 
tide  on  the  side  of  the  Earth  toward  the  Moon,  and  another  on 
the  side  opposite  the  Moon,  or  two  tides  per  day.  When  the 
Moon  is  new  or  full,  the  Sun  and  Moon  combine  to  produce 
very  high  tides.  During  half-moons,  the  Sun  and  Moon  pull 
at  the  right  angles  to  each  other  and  the  tidal  forces  are 
weaker.  Because  it  takes  time  to  get  an  ocean  full  of  water 
moving,  the  actual  high  tide  will  lag  behind  the  Moon  by 
some  odd  hours.  The  “solunar”  charts  are  used  by  hunters 
and  fishermen  to  predict  peak  periods  of  game  and  fish 
activity  are  simply  charts  of  this  tidal  force. 

If  a  full  moon  occurs  exactly  on  one  of  the  nodes,  the 
Earth’s  shadow  will  fall  across  the  Moon,  and  there  will  be  a 
lunar  eclipse.  Because  the  Earth’s  shadow  is  larger  than  the 
Moon,  a  lunar  eclipse  is  visible  from  anywhere  on  the  night 
side  of  the  Earth  and  may  last  several  hours.  If  a  new  moon 
occurs  exactly  on  one  of  the  nodes,  the  Moon’s  shadow  will 
fall  across  part  of  the  Earth,  and  there  will  be  a  solar  eclipse. 


Since  the  Moon’s  shadow  is  much  smaller  than  the  Earth,  the 
eclipse  will  only  be  seen  in  certain  areas,  and  the  alignment 
of  Earth,  Sun  and  Moon  must  be  much  more  precise  than  for 
a  lunar  eclipse. 

How  could  the  ancient  Britons  have  used  Stonehenge  as  a 
computer  to  simulate  this  model  of  the  cosmos?  The  secret 
lies  in  the  circle  of  56  Aubrey  holes.  Consider  this  circle  to 
represent  the  fixed  background  of  stars.  Now  place  four  large 
stones  on  the  Aubrey  holes  for  markers;  one  for  the  Sun,  one 
for  the  Moon  and  two  opposite  each  other  for  the  nodes  of  the 
moon.  Move  the  stones  according  to  the  following  rules: 

1 .  Move  the  moonstone  one  hole  counter-clockwise  every 
morning  and  evening. 

2.  Move  the  sunstone  one  hole  counter-clockwise  every 
6 Vi  days,  or  once  for  every  13  moves  of  the  moonstone. 

3 .  Move  the  nodestones  one  hole  clockwise  3  times  a  year. 

These  simple  rules  approximate  the  motions  of  Sun,  Moon 
and  nodes  but  allow  the  stones  to  eventually  drift  out  of 
position.  The  nodestones  will  stay  in  step  for  several  cen¬ 
turies,  and  can  be  reset  at  leisure  by  observations  or  by 
waiting  for  an  eclipse.  The  sunstone  will  drift  out  of  position 
in  a  year  or  two,  but  can  be  reset  at  each  summer  and  winter 
solstice.  If  one  solstice  is  missed  because  of  bad  weather,  the 
position  will  still  be  reasonably  accurate.  The  moonstone 
will  drift  out  of  position  most  quickly  —  about  four  holes  in 
three  months.  It  can  be  reset  at  each  new  moon,  but  it  is  more 
likely  an  auxiliary  rule  was  used,  in  the  same  way  that  we 
adjust  our  calendar  during  leap  years.  If  the  moonstone  is 
moved  one  extra  hole  at  each  new  moon,  and  moved  one 
more  extra  hole  at  each  solstice  and  equinox  (that  is,  four 
times  a  year  or  every  three  months),  the  moonstone  will  stay 
in  position  for  at  least  a  year.  Through  a  combination  of 
ritually  applied  rules  and  careful  astronomical  sightings,  it 
would  have  been  possible  to  maintain  an  accurate  model  of 
solar  and  lunar  movements,  even  when  the  skies  were 
clouded  for  months  at  a  time.  However,  if  the  realtime 
settings  of  the  markers  were  lost,  it  might  take  several  gener¬ 
ations  to  restore  them.  Now  we  begin  to  see  why  Stonehenge 
was  built  of  30-ton  stones,  and  why  the  grounds  were  con¬ 
sidered  sacred! 

Let’s  run  through  a  modem  example  to  see  how  this 
computer  might  have  been  used,  and  how  useful  it  might 
have  been.  The  program  in  The  Program  Listing  was  used  to 
determine  the  setting  of  the  marker  stones  for  March  13, 
1979  (see  Figure  3).  The  sun,  moon  and  node  stones  are  all 
aligned  along  holes  16  to  44.  It  is  full  moon  and  there  will  be 
a  lunar  eclipse  (not  visible  from  the  United  States).  The 
Moon  will  rise  just  at  sunset  and  reach  its  highest  point  at 
midnight.  The  tidal  force  will  peak  at  noon  and  midnight,  and 
those  will  be  the  best  hours  for  hunting  and  fishing.  High 
tides  will  arrive  at  Philadelphia  about  1:30  a.m.  and  p.m. 
Because  it  is  full  moon,  these  will  be  relatively  strong  tides. 

Figure  4  shows  the  settings  for  March  22,  nine  days  later. 
The  sunstone  has  just  moved  into  hole  14,  and  it  is  the  spring 
equinox.  The  moonstone  is  in  hole  24,  past  half  and  waning. 
The  Moon  will  rise  after  midnight,  and  the  tidal  forces  will 
peak  after  dawn,  with  the  high  tides  about  9:00  a.m.  The 
tides  will  be  increasing  in  force. 

Figure  5  shows  the  situation  on  April  11th,  twenty  days 
later.  The  Moon  has  gone  past  new  and  back  to  full.  This  is 
the  first  full  moon  since  the  spring  equinox.  The  calendar 
shows  that  the  1 1th  is  a  Wednesday.  The  15th  of  April  is  the 
first  Sunday  followed  the  first  bill  moon,  following  the 
spring  equinox,  and  it  will  be  Easter  Sunday! 

Returning  to  the  (invisible)  eclipse  of  March  14th,  how 
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can  you  know  in  advance  whether  a  particular  eclipse  will  be 
visible  from  a  particular  location?  By  taking  careful  sightings 
of  the  direction  and  time  between  sunset  and  moonrise,  the 
uncertainty  can  be  minimized,  but  not  eliminated.  However, 
there  is  a  more  nearly  foolproof  method.  Some  6585.3  days, 
or  exactly  223  full  moons,  after  an  exclipse  there  will  be 
another  eclipse  of  the  same  kind,  about  seven  hours  later  in 
the  day.  If  you  knew  of  the  eclipse  occurring  on  August  26, 
1961,  you  could  be  reasonably  sure  of  seeing  the  one  on 
September  6,  1979.  Knowing  that  the  eclipse  of  September 
6th  occurred  near  dawn,  you  would  expect  the  eclipse  of 
September  16,  1997  to  occur  during  daylight  and  be 
invisible. 

This  cycle,  called  the  saros,  is  pure  coincidence.  It  could 
not  be  inferred  or  predicted  and  would  not  exist  at  all  if  the 
periods  of  Sun,  Moon,  or  nodes  were  even  slightly  different. 
But  if  someone  at  Stonehenge  were  recording  eclipses  and 
keeping  count  of  full  moons,  they  would  soon  notice  the 
cycle.  At  least  56  years  of  records  are  necessary  to  make 
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reasonably  reliable  predictions,  and  a  great  deal  of  effort 
must  have  gone  into  keeping  tables  of  known  eclipses.  Lunar 
eclipse  prediction  should  have  been  nearly  perfect.  The 
accurate  prediction  of  solar  eclipses  was  beyond  their  skill, 
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for  April  11,  1979 


but  they  would  have  had  warning  of  each  one  that  actually 
occurred. 

Why  predict  eclipses  at  all?  The  usual  explanation  if  that 
eclipses  were  a  terrifying  sight  to  a  primitive,  superstitious 
people,  and  that  they  wanted  advance  warning  of  the  catas¬ 
trophe.  Being  able  to  predict  eclipses  would  certainly  have 


increased  the  prestige  of  priesthood.  But  we’ve  seen  that  the 
builders  of  Stonehenge  were  no  fools  —  it  could  be  that  they 
eagerly  anticipated  eclipses  as  an  opportunity  to  precisely 
reset  the  markers  in  their  megalithic  computer  and  confirm 
the  model  built  up  so  carefully  from  inference,  observation 
and  years  of  hard  work! 

The  program  in  the  Program  Listing  can  be  used  to  initial¬ 
ize  a  model  of  Stonehenge  for  experimentation  and  to  com¬ 
pute  the  interval  of  223  full  moons  for  eclipse  prediction.  It 
does  not  correct  for  longitude  or  time  of  day  and  shouldn’t  be 
used  as  a  substitute  for  an  astronomical  ephemeris,  but  the 
results  should  be  within  one  day  or  one  hole.  The  only  other 
apparatus  needed  to  experiment  with  a  Stonehenge-type 
computer  are  a  large  cardboard  chart  of  the  56  Aubrey  holes, 
some  coins  for  markers,  and  a  calendar  showing  solstices, 
equinoxes  and  phases  of  the  Moon.  Eclipses  are  usually 
confirmed  by  the  news  media  a  few  days  ahead  of  time. 

You  can  get  the  most  out  of  a  model  by  leaving  it  set  up  for 
a  period  of  months  and  moving  the  markers  each  day,  notic¬ 
ing  the  correlation  between  the  model  and  the  night  sky.  A 
classroom  model  maintained  for  an  entire  school  year  would 
make  an  excellent  earth  science  project. 

The  routines  in  the  Program  Listing  can  also  be  used  as  the 
nucleus  for  a  more  ambitious  program  that  graphically 
displays  the  position  of  each  marker  stone  on  a  diagram  of 
Stonehenge,  possibly  permitting  you  to  step  forward  in  time 
while  animated  markers  move  through  their  cycles. 

In  any  case,  when  you  get  to  thinking  that  your  own 
computer  is  too  slow  or  has  too  little  memory  for  any  impor¬ 
tant  application,  think  about  those  Stone  Age  priests 
carrying  boulders  around  a  hundred  meter  circle  to  enter 
data  into  a  computer  built  of  30-ton  silicon  “chips.” 
Stonehenge  may  be  classic  example  of  clever  program¬ 
ming  overcoming  hardware  limitations! 


Program  Notes 


This  program  was  written  in  Programma  version  2.0 
BASIC  for  the  Sphere  System  3.  Every  effort  was  made  to 
avoid  special  instructions  and  non-standard  forms,  so  the 
program  should  translate  into  other  BASICS  with  a  minimum 
of  debugging.  The  PRINT  statements  are  formatted  for  a 
32-character  by  16-line  screen.  This  program  contains  rou¬ 
tines  to  perform  five  major  functions: 

1 .  Input  a  date  in  the  form  year,  month,  day. 

2.  Convert  a  date  in  the  form  year,  month,  day  into  a  single 
number  representing  the  count  of  days  from  December  3 1 , 
1949. 

3 .  Convert  a  date  in  single-number  form  back  into  the  form 
year,  month,  day. 

4.  Compute  the  dates  223  full  moons  before  and  after  a 
given  date. 

5 .  Compute  the  settings  of  the  markers  at  Stonehenge  for  a 
given  date. 

Lines  50  to  260  are  the  main  program  loop.  Lines  60  to  80 
clear  the  screen,  and  lines  90  to  190  print  the  menu.  Lines 
200  to  260  input  the  option  number  and  jump  to  the  desired 
section. 

The  subroutine  at  line  270  inputs  a  date  as  three  numbers: 
Y,  M  and  D.  Line  3 10  makes  the  number  Y  an  integer,  and 
lines  320,  330  check  to  see  that  it  is  within  the  allowed  range. 
Lines  340  to  360  will  input  the  year  again  if  Y  is  outside  the 
range.  The  month  and  day  are  input  in  the  same  way. 


The  routine  at  line  570  computes  a  single  index  number,  I, 
which  is  the  number  of  days  between  December  31,  1949, 
and  the  date  in  Y,  M  and  D.  Line  590  multiplies  the  years  by 
365.  Line  600  adds  one  day  for  every  fourth  year  (leap 
years),  and  lines  610,  620  correct  for  the  year  2000  (not  a 
leap  year).  Lines  630  to  880  add  the  proper  number  of  days 
for  each  month  up  to  M.  Lines  1050,  1060  check  for  the  29th 
day  of  February  during  leap  years.  Lines  890  to  920  add  the 
days,  D,  and  a  small  decimal  to  prevent  the  index  number 
from  computing  to  NNNN. 9999999. 

The  subroutine  at  line  930  takes  an  index  number  I  and 
returns  a  date  in  the  form  Y,  M,  D.  Lines  940  to  970  put 
initial  value  into  Y,  M,  D  and  transfer  I  to  a  temporary 
variable  so  that  I  is  not  lost  during  computation.  Lines  980  to 
1080  are  a  loop  that  subtract  365  from  the  index  and  add  1  to 
the  year  until  the  index  is  less  than  365  (or  366  for  a  leap 
year).  Lines  1090  to  1450  make  a  special  case  of  each  month, 
subtracting  the  correct  number  of  days  from  the  index,  add¬ 
ing  1  to  the  month,  and  checking  to  see  if  there  are  enough 
days  left  for  the  next  month.  Lines  1460  to  1530  set  the  day 
equal  to  the  number  remaining  in  the  index,  and  check  for 
February  29th  on  leap  years. 

Lines  1550  to  18 10  compute  the  saros  in  a  straightforward 
way.  The  index  for  a  known  eclipse  is  computed  (line  1610) 
and  saved  in  II  (line  1620).  Then  6585  days  are  subtracted 
from  the  index  and  Y,  M  and  D  are  computed  for  the  previous 


SUNSTONE  MOVED  INTO  HOLE  45 

Sample  Run 

ON  DftTE  1979  9  1 

MOON  STONE  RT  HOLE  17 

ENTER  OPTION  <Q-2>  2 

ENTER  THE  DftTE  OF  THE  KNOWN 

DO  YOU  WftNT  TO: 

N  STONE  ftT  HOLE  17 

N'  STONE  ftT  HOLE  45 

N  STONES  MOVED  1979  9  1 

ECLIPSE— 

YEftR?  1979 

0.  EXIT  TO  BftSIC? 

MONTH?  9 

DftY?  6 

1.  COMPUTE  THE  SETTING  FOR  ft 

HIT  RETURN  TO  CONTINUE— 

GIVEN  DftTE? 

KNOWN  ECLIPSE  OCCURRED: 

2.  COMPUTE  THE  SftROS  FOR  ft 

SOFTWRRE  STONEHENGE 

1979  9  6 

KNOWN  ECLIPSE? 

ENTER  OPTION  (0-2)  1 

DO  YOU  WftNT  TO: 

THE  PREVIOUS  ECLIPSE  IN  THIS 

SftROS  OCCURRED: 

O.  EXIT  TO  BftSIC? 

1961  8  26 

ENTER  THE  DftTE  TO  WHICH  YOU  WftNT 

THE  STONES  SET— 

1.  COMPUTE  THE  SETTING  FOR  ft 

THE  NEXT  ECLIPSE  IN  THIS  SftROS 

GIVEN  DftTE? 

WILL  OCCUR: 

YEftR?  1979 

MONTH ?  9 

2.  COMPUTE  THE  SftROS  FOR  ft 

1997  9  16 

DftY?  6 

KNOWN  ECLIPSE ? 

HIT  RETURN  TO  CONTINUE— 

eclipse  in  that  saros  (lines  1660  to  1720).  Lines  1730  to  1780 
find  the  next  eclipse  in  the  cycle.  The  original  index  is 
recovered  from  II  and  6585  days  are  added  to  it  (line  1740). 
Y,  M,  Dare  found  as  before.  Lines  1790, 18 10  keep  the  dates 
from  scrolling  off  the  screen  before  they  can  be  read. 

Lines  1 820  to  2360  compute  the  proper  setting  for  the  sun, 
moon  and  node  stones  for  any  given  date  between  January  1 , 
1950,  and  December  31,  2099.  Lines  1820  to  1910  get  the 
date  and  compute  its  index  number.  Again,  the  index  is  saved 
in  II, this  timeY,M  and  D  are  also  saved  in  Yl,  Ml  and  Dl. 
Lines  1920  to  2040  find  the  sunstone  setting.  Y  is  set  to  1950 
(line  1930)  because  the  sunstone  setting  is  the  same  for  a 
given  date  in  any  year.  In  line  1950,  192.1  represents  the 
offset  between  January  1 ,  the  beginning  of  our  calendar  year, 
and  Aubrey  hole  1  at  Stonehenge  (marking  midsummer’s 
day).  Dividing  by  365  gives  the  index  in  years,  and  multi¬ 
plying  by  56  gives  the  proper  hole  number  in  I.  In  line  1960, 1 
is  subtracted  from  56  because  the  Aubrey  holes  are 
numbered  clockwise,  and  the  sunstone  is  rotating  counter¬ 
clockwise.  Line  1990  computes  the  date  on  which  the 
sunstone  was  last  moved;  this  eliminates  a  6.5-day  uncer¬ 
tainty  in  the  sun’s  position.  Lines  2050  to  2150  compute  the 
position  of  the  moonstone.  Y,  M  and  D  are  restored  (lines 
2060  to  2080)  and  the  index  is  computed  and  stored  (lines 


2090,  2100).  Line  2110  represents  an  offset  for  January  1, 
1950.  Line  2120  finds  the  days  in  the  current  lunar  cycle  (I 
reduced  modulo  27.3217),  line  2130  converts  days  into 
number  of  holes  and  reverses  the  direction  of  rotation.  Lines 
2 160  to  2320  find  the  position  of  the  nodestones.  The  index  is 
recovered  and  an  offset  added  to  it  (line  2170).  The  index  is 
reduced  modulo  6797.1  (lines  2180,  2190).  The  index  is 
converted  from  days  to  number  of  holes  away  from  N  (lines 
2230,  2250).  Again,  lines  2340,  2350  keep  the  information 
from  scrolling  away  before  it  can  be  read.  □ 

For  Further  Reading 

Stonehenge 

Hoyle,  Fred,  Sir.  On  Stonehenge ,  W.F.  Freeman  and  Com¬ 
pany,  1977 

Hawkins,  Gerald  S.  and  White,  John  B.  Stonehenge 
Decoded ,  Dell  Publishing  Company,  Inc.,  1965 

Lunar  Eclipses 

Satterth  waite,  Gilbert  E.  Encyclopedia  of  Astronomy,  page 
108,  St.  Martin’s  Press,  N.Y.,  1971 

Solar  Eclipses 

The  Encyclopedia  Americana,  volume  9:  page  586, 
Danbury,  Conn. ,  06816 


Program  Listing 


10 

REM - 

— ”ST0NEHENGE  SIMULRTION  PROQRftM” 

180 

PRINT 

20 

REM - 

WRITTEN  IN  PROGRftMMft  2.  0  BftSIC 

FOR  SPHERE  SYS  3" 

190 

PRINT  ” ENTER  OPTION  (0-2)”; 

30 

REM - 

—  ”1979  ftUGUST  6  DJB " 

208 

INPUT  N 

40 

REM  ' VERS .  10  ON  H2  0  37” 

210 

PRINT 

50 

REM - 

—  ”MftIN  LOOP  BEGINS  HERE " 

220 

PRINT 

60 

FOR  ft=l 

TO  16 

230 

IF  N=1  GOTO  1820 

70 

PRINT 

240 

IF  N=2  GOTO  1550 

80 

NEXT  ft 

250 

IF  NOB  GOTO  50 

90 

PRINT  " 

SOFTWRRE  STONEHENGE” 

260 

END 

100 

PRINT 

270 

REM - ” SUBROUTINE  TO  INPUT  DftTE  Y>M,D” 

110 

PRINT 

HD0  YOU  WftNT  TO:  ” 

288 

PRINT 

120 

PRINT 

290 

PRINT  ” YEftR?”; 

130 

PRINT 

”  0.  EXIT  TO  BftSIC?” 

300 

INPUT  Y 

140 

PRINT 

310 

LET  INT(  Y+8.  001) 

150 

PRINT 

”  1.  COMPUTE  THE  SETTING  FOR  ft 

GIVEN  DftTE?” 

320 

IF  YC1950  GOTO  340 

160 

PRINT 

330 

IF  YC2100  GOTO  370 

170 

PRINT 

”  2.  COMPUTE  THE  SftROS  FOR  ft 

KNOWN  ECLIPSE?” 

340 

PRINT 

359  PRINT  "(1959  TO  2100  ONLY)" 

369  GOTO  270 

370  PRINT  “MONTH?"* 

380  INPUT  M 

399  LET  H=  INT<  M+0.  001) 

409  IF  t1<l  GOTO  420 

410  IF  M<13  GOTO  460 
420  PRINT 

430  PRINT  "(MONTH  FROM  1  TO  12)" 

449  PRINT 

459  GOTO  370 

460  PRINT  "DRY?"; 

479  INPUT  0 

480  LET  D=  INT<  D+8.  091) 

490  IF  DCl  GOTO  518 

590  IF  D<32  GOTO  550 
510  PRINT 

520  PRINT  "(DRY  FROM  1  TO  31)" 

530  PRINT 
540  GOTO  460 
550  PRINT 

569  RETURN 

570  REM - "SUBROUTINE  TO  CRLCULRTE  INDEX  I  FROM  DRTE  V,M*D" 

580  REM  —"FIRST  GET  YERR “ 

590  LET  I=(Y-1958)+365 

609  LET  1=1+  INT (  (Y-1949)/4+9.  001) 

610  IF  Y<=2000  GOTO  630 

629  LET  1=1-1 

630  REM  —"NON  GET  MONTH- 
640  IF  M=1  GOTO  890 

650  LET  1=1+31 
668  IF  M=2  GOTO  899 

670  LET  1=1+28 

680  IF  INT(  Y/4+0  001)*4<>Y  GOTO  718 

690  IF  V-2080  GOTO  710 

700  LET  1=1+1 

710  IF  M =3  GOTO  890 

720  LET  1=1+31 

730  IF  M=4  GOTO  898 

749  LET  1=1+30 

759  IF  M=5  GOTO  890 

768  LET  1=1+31 

770  IF  M=6  GOTO  898 

789  LET  1=1+30 

790  IF  M=7  GOTO  898 
800  LET  1=1+31 

810  IF  M=8  GOTO  890 

828  LET  1=1+31 

830  IF  M=9  GOTO  898 

840  LET  1=1+30 

858  IF  M=18  GOTO  890 

860  LET  1=1+31 

870  IF  M=ll  GOTO  890 

880  LET  1=1+30 

890  REM  —"NON  GET  DRY" 

988  LET  I=I+D 

919  LET  1=1+9  01 

920  RETURN 

930  REM  - -SUBROUTINE  TO  CRLCULRTE  DRTE  Y*  M,  D  FROM  INDEX  I" 

940  LET  R=I 
958  LET  Y=1958 

969  LET  M=1 

970  LET  D=1 

980  REM  —  " LOOP  HERE  FOR  YERR" 

990  IF  INT(  (Y+D/4+8  81>+4<>Y+1  GOTO  1828 

1080  IF  R<=366  GOTO  1890 

1010  GOTO  1030 

1020  IF  R<=365  GOTO  1898 

1030  LET  R=R-365 

1040  LET  Y=Y+1 

1050  IF  INT(  Y/4+0  01)*4<>V  GOTO  10S8 
I860  IF  Y=2080  GOTO  1080 
1078  LET  R=R-1 
1088  GOTO  980 

1090  REM  —  " DETERMINE  MONTH" 

1108  IF  R<=31  GOTO  1460 

1118  LET  R=R-31 

1120  LET  M=M+1 

1130  IF  R<=29  GOTO  1460 

1148  LET  R=R-28 

1150  LET  M=M+1 

1160  IF  INT(  Y/4+0  01)OY  GOTO  1190 

1178  IF  Y=2000  GOTO  1190 

1180  LET  R=R-1 

1190  IF  R<=31  GOTO  1460 

1200  LET  R=R-31 

1210  LET  M=M+1 

1220  IF  R<=30  GOTO  1460 

1230  LET  R=R-30 

1240  LET  M=M+1 

1258  IF  R<=31  GOTO  1468 

1260  LET  R=R-31 

1270  LET  M =M+1 

1280  IF  R<=38  GOTO  1468 

1298  LET  R=R-30 

1308  LET  M=M+1 

1310  IF  R<=31  GOTO  1460 

1320  LET  R=R~31 

1330  LET  M=M+1 

1340  IF  R<=31  GOTO  1460 

1350  LET  R=R-31 


1368  LET  M=M+1 

1370  IF  R<=30  GOTO  1460 

1380  LET  R=R-38 

1390  LET  M=M+1 

1480  IF  R<=31  GOTO  1468 

1410  LET  R=R-31 

1420  LET  M=M +1 

1430  IF  R<=30  GOTO  1460 

1448  LET  R=R-30 

1450  LET  M=M+1 

1460  REM  —"NON  THE  DRY- 

1470  LET  D=R 

1 480  IF  M<>2  GOTO  1540 

1490  IF  0029  GOTO  1540 

1500  IF  Y=2000  GOTO  1520 

1510  IF  INT(  Y/4+0  dl)*4=Y  GOTO  1540 

1520  LET  M=3 

1530  LET  D=1 

1548  RETURN 

1550  REM  - "THIS  SECTION  COMPUTES  THE  SRROS" 

1568  PRINT 
1570  PRINT 

1588  PRINT  "ENTER  THE  DRTE  OF  THE  KNOUN  ECLIPSE—" 

1590  GOSUB  270 
1680  PRINT 
1610  GOSUB  570 
1620  LET  11=1 

1638  PRINT  "KNOUN  ECLIPSE  OCCURRED: " 

1640  PRINT  "  Y;  M;  D 

1650  PRINT 

1660  REM  —"FIND  PREVIOUS  ECLIPSE " 

1670  LET  1=1-6585 
1680  IF  I<1  GOTO  1730 
1690  GOSUB  930 

1700  PRINT  "THE  PREVIOUS  ECLIPSE  IN  THIS  SRROS  OCCURRED: " 
1710  PRINT  "  ";V;M;D 

1720  PRINT 

1730  REM  —"FIND  NEXT  ECLIPSE- 
1740  LET  1=11+6585 
1750  GOSUB  930 

1760  PRINT  "THE  NEXT  ECLIPSE  IN  THIS  SRROS  HILL  OCCUR: " 

1770  PRINT  "  ";V;M;D 

1788  PRINT 

1798  PRINT  " HIT  RETURN  TO  CONTINUE— "; 

1800  INPUT  R 
1810  GOTO  50 

1820  REM - "THIS  SECTION  SETS  STONES  FOR  DRTE  V,  M,  D" 

1830  PRINT 
1840  PRINT 

1850  PRINT  "ENTER  THE  DRTE  TO  UHICH  YOU  URNT  THE  STONES  SET—" 

I860  GOSUB  270 

1870  LET  V1=Y 

1880  LET  M1=M 

1898  LET  Di=D 

1988  GOSUB  570 

1910  LET  11=1 

1920  REM  —"SUN  STONE  FIRST- 

1930  LET  Y=1950 

1948  GOSUB  570 

1950  LET  T=( 1+192.  l)/365*56 

I960  LET  S=56 -  INT(  T) 

1970  IF  S>=1  GOTO  1990 
1980  LET  S=S+56 

1990  LET  I=I1-((T-  INT(  T))*6.  5) 

2000  GOSUB  938 
2010  PRINT 

2020  PRINT  "SUNSTONE  MOVED  INTO  HOLE  " ;S 
2830  PRINT  "  ON  DRTE";  Y;  M;  D 
2040  PRINT 

2650  REM  —"SET  MOON  STONE" 

2060  LET  Y=Y1 
2070  LET  M=M1 
2080  LET  D=D1 
2098  GOSUB  578 
2100  LET  11=1 
2110  LET  1=1-2.  3 

2120  LET  M=I-  INK  1/27.  3217) *27.  3217 
2130  LET  M=56-  INK  M+56/27.  32) 

2140  PRINT  "MOON  STONE  RT  HOLE";  M 
2150  PRINT 

2160  REM - "NOU  SET  N  RND  N'm 

2170  LET  1=11+4937 

2180  LET  T=  INK  1/6797.  1)*6797.  1 

2190  LET  N=I-T 

2200  LET  N=  INK  N+56/6798) 

2210  IF  N>=1  GOTO  2230 
2220  LET  N=N+56 
2230  LET  Nl=N+28 
2240  IF  Nl<=56  GOTO  2270 
2258  LET  Nl=Nl-56 
2260  PRINT 

2278  PRINT  "N  STONE  RT  HOLE";  N 
2288  PRINT  "N'  STONE  RT  HOLE";  N1 
2290  LET  Y=Y1 

2300  LET  M=  INT(  (Ml-l)/4)*4+l 
2310  LET  D=1 

2320  PRINT  "N  STONES  MOVED";  V;  M;  D 
2330  PRINT 

2340  PRINT  "HIT  RETURN  TO  CONTINUE—"; 

2350  INPUT  R 
2360  GOTO  50 


for  Measures 


Home  audiophiles  know  the  frus¬ 
tration  of  trying  to  record  music 
without  being  certain  how  much  tape 
they  need.  If  your  tape  deck  has  an 
automatic  stop,  one  of  the  worst  sounds 
in  the  world  is  the  nasty  little  “-click-” 
you  hear  when  the  deck  runs  out  of  tape 
—  especially  when  the  music  you're 
trying  to  record  hasn't  stopped  yet. 

This  short  program  can  help  you 
avoid  a  number  of  problems.  It  figures 
out  how  much  tape  you’ll  need  to  re¬ 
cord  a  record  album,  how  to  best  re¬ 
arrange  selections  to  fit  the  tape  you’re 
using,  and  how  much  extra  time  you’ll 
have  left  at  the  end  of  the  tape.  It  also 
lets  you  avoid  the  hassle  of  “Base  60” 
math,  since  it  converts  seconds  into 
minutes  and  seconds  quickly  and 
easily. 

The  Sample  Runs  illustrate  some  of 
these  applications.  The  soundtrack  al¬ 
bum  for  the  TV  show  “Battlestar 
Galactica”  contains  16  selections, 
which  immediately  makes  you  think 
it’s  longer  than  the  average  album.  But 
timing  side  one  shows  there’s  less  than 
20  minutes  of  music  on  the  side.  Add¬ 
ing  the  time  of  side  one  to  the  times  of 
the  selections  on  side  two,  we  get  the 
total,  and  find  that  the  entire  album  will 


fit  on  one  side  of  a  90-minute  cassette 
—  with  enough  time  left  over  for  a 
disco  version  of  the  theme  song  by  an¬ 
other  artist.  (The  two  sides  will  also  fit 
comfortably  on  a  C-45  cassette,  if  you 
prefer.) 

The  next  few  runs  involve  the  last 
three  albums  recorded  by  Henry  Man- 
cini:  “The  Cop  Show  Themes”, 
“Mancini’s  Angels”  and  “The  Theme 
Scene”.  Assume  we  want  to  fit  at  least 
two  of  these  onto  a  C-90  cassette.  We 
time  “The  Cop  Show  Themes”,  which 
is  only  24  minutes  and  50  seconds  long. 
We  then  add  the  times  for  “Mancini’s 
Angels”,  still  coming  up  with  a  total 
time  of  less  than  one  hour.  Adding  the 
selections  on  the  “Theme  Scene” 


BY  ROD  MORGAN 


album,  we  discover  all  three  will  fit 
onto  the  same  90-minute  cassette. 

A  few  more  runs  will  show  us  the 
best  way  to  fit  the  albums  onto  the  cas¬ 
sette.  Timing  “The  Cop  Show 
Themes”  and  side  one  of  “Mancini’s 
Angels”,  we  have  a  total  of  about  41 
minutes  of  music.  Adding  that  total  to 
the  time  of  the  first  selection  on  side 
two  of  “Mancini’s  Angels”,  we  have 
the  best  length  for  side  one  of  the 
cassette.  Then  double-checking  the  re¬ 
maining  selections’  times,  we  find  that 
the  other  tracks  will  fill  out  side  two. 
This  arrangement  will  also  fit  the  three 
albums  in  chronological  order  of  re¬ 
lease,  which  some  tape  buffs  find  desir¬ 
able. 

This  program  can  also  help  you  ar¬ 
range  “sampler”  cassettes  or  put 
together  your  own  “radio  shows”. 

Incidentally,  current  interpretations 
of  the  copyright  laws  judge  that  this 
type  of  taping,  for  personal  use,  of 
recordings  you  already  own  is  perfectly 
legal.  Copying  a  friend’s  LP  for  your¬ 
self  is  technically  illegal;  and,  of 
course,  making  tape  copies, of  an  album 
for  re-sale  can  subject  you  to  federal 
prosecution.  So,  while  using  this  pro¬ 
gram,  keep  your  nose  clean!  □ 


Illustration  by  David  Bastille 


Program  Listing 


00100 

00110 

00120 

00130 

00140 

00150 

00160 

00170 

00180 

00190 

00200 

00210 

00220 

00230 

00240 

00250 

00260 

00270 

00280 

00290 

00300 

00310 

00320 

00330 

00340 

00350 

00360 

00370 

00380 

00390 

00400 

00410 

00420 

00430 

00440 

00450 

00460 

00470 

00480 

00490 

00500 

00510 

00520 

00530 

00540 

00550 

00560 

00570 

00580 

00590 


REM 

REM 

REM 

REM 

REM 

REM 

REM 

REM 

REM 

REM 

REM 

REM 


RECORDING  TIMER 
PROGRAM  BY  ROD  MORGAN 
P  0  BOX  44 
HERNDON,  VA  22070 

THIS  PROGRAM  ACCEPTS  A  NUMBER  OF  TIMINGS 
AND  TOTALS  THEM.  THIS  SPECIFIC  APPLICATION 
IS  FOR  TAPING  RECORD  ALBUMS,  ETC. 

MORE  THAN  25  LISTINGS  CAN  BE  ADDED  BY 
CHANGING  LINE  270. 


ALBUM  TITLE  MEMO,  NUMBER  OF  SELECTIONS 
PRINT  "ENTER  ALBUM  TITLE"; 

INPUT  R* 

PRINT  "HOU  MANY  SELECTIONS  DO  YOU  UISH  TO  ADD"; 

INPUT  T 

REN  DIMENSION  AND  CLEAR  VARIABLES 

DIMENSION  M ( 25 ) ,  S(25) 

Ml  =0 
SI  =0 

FOR  C=1  TO  T 
M(C )=0 
S(C>=0 
NEXT  C 

REM  ENTER  TIMINGS 

PRINT  "AT  THE  ENTER  MINUTES  *  SECONDS  AS  FOLLOUS:" 

PRINT  "  MM , SS  (SUCH  AS  5,11  FOR  A  5:11  SELECTION)" 

FOR  C=1  TO  T 
INPUT  M(C),  S(C) 

Ml =M1 +M(C ) 

S1=S1+S(C) 

NEXT  C 

REM  CONVERT  SECONDS  TO  MINUTES/SECONDS 

SI =S1 / 60 
M2=INT (SI ) 

S1=S1-M2 
S1=S1*60 
Ml =M1 +M2 

REM  PRINT  TITLE  AND  TOTALS 

PRINT  "FOR  '"JR*;"'  YOU'LL  NEED  ABOUT  " ;H1 ; " : " ;S1  ; "  OF  TAPE. 

REM 

REM  THE  PROGRAM  ADVISES  •'ABOUT'  SINCE  ALBUM  TIMES 

REM  GENERALLY  DO  NOT  INCLUDE  THE  SILENCE  BETWEEN  TRACKS. 

REM  THIS  WILL  ADD  A  FEU  SECONDS  TO  TOTAL  TIME,  UHICH  SHOULD 

REM  BE  CONSIDERED  BY  PROGRAM  USERS. 

PRINT  "DO  YOU  UANT  TO  ADD  MORE  SELECTIONS"; 

INPUT  J* 

IF  LEFT*(J*,1)="Y”  GOTO  100 
PRINT  "OKAY  -  SEE  YOU  LATER." 

END 


AT  THE  'V  iENTER  MINUTES  *  SECONDS  AS  FOLLOWS: 
MM , SS  (SUCH  AS  5,11  FOR  A  5:11  SELECTION) 
7  24 , 50 
?3,01 
73,50 
73,14 

72.57 

72.58 
72,07 
72,48 
?2,38 
76 , 37 


FOR  'COP  SHOW/ANGELS'  YOU'LL  NEED  ABOUT  55  :  0 
DO  YOU  WANT  TO  ADD  MORE  SELECTIONS  ?YES 
ENTER  ALBUM  TITLE  ’COP/ ANGELS/THEME  SCENE 
HOU  MANY  SELECTIONS  DO  YOU  UISH  TO  ADD  ’11 
AT  THE  '?'  ENTER  MINUTES  X  SECONDS  AS  FOLLOUS: 
MM ,SS  (SUCH  AS  5,11  FOR  A  5:11  SELECTION) 
?55,0 
?3 , 1 1 
74,03 
73,13 
73*31 


71.51 

72.52 
73,35 


OF  TAPE. 


Sample  Run 


ENTER  ALBUM  TITLE  ’GALACTICA  SIDE  ONE 
HOU  MANY  SELECTIONS  DO  YOU  WISH  TO  ADD  78 
AT  THE  ENTER  MINUTES  &  SECONDS  AS  FOLLOWS: 

MM ,  SS  (SUCH  AS  5,11  FOR  A  5:11  SELECTION) 

?1 ,28 
?4, 01 

72,49 

72.54 
73,24 

71.14 
71,42 
71,42 

FOR  "GALACTICA  SIDE  ONE'  YOU"LL  NEED  ABOUT  19  :  14. 

DO  YOU  WANT  TO  ADD  MORE  SELECTIONS  7YES 

ENTER  ALBUM  TITLE  7 BATTLES! AR  GALACTICA 

HOU  MANY  SELECTIONS  DO  YOU  WISH  TO  ADD  *9 

AT  THE  ENTER  MINUTES  &  SECONDS  AS  FOLLOWS: 

MM , SS  (SUCH  AS  5,11  FOR  A  5:11  SELECTION) 

719.14 

73.51 

72.57 
72,23 

71.52 

74,10 
72,41 
71,13 
71,06 

FOR  "BATTLE STAR  GALACTICA"  YOU-'LL  NEED  ABOUT  3?  :  27. 

DO  YOU  WANT  TO  ADD  MORE  SELECTIONS  7YES 

ENTER  ALBUM  TITLE  7C0P  SHOW  THEMES 

HOU  MANY  SELECTIONS  DO  YOU  WISH  TO  ADD  78 

AT  THE  'V  ENTER  MINUTES  S  SECONDS  AS  FOLLOUS: 

MM , SS  (SUCH  AS  5,11  FOR  A  5:11  SELECTION) 

71.58 
72,48 

71.55 
74, 44 
75,03 
72,51 
72,17 
73,1  a 

FOR  "COP  SHOW  THEMES*'  YOU"LL  NEED  ABOUT  24  :  50.  OF 
DO  YOU  WANT  TO  ADD  MORE  SELECTIONS  ?YES 
ENTER  ALBUM  TITLE  7C0P  SHOW/ ANGELS 
HOW  MANY  SELECTIONS  DO  YOU  WISH  TO  ADD  ’10 


OF  TAPE. 


OF  TAPE. 


TAPE. 


73 .10 

72,59 

72.47 

FOR  "COP/ANGELS/THEME  SCENE"  YOU'LL  NEED  ABOUT  86  : 
DO  YOU  WANT  TO  ADD  MORE  SELECTIONS  7N0 
OKAY  -  SEE  YOU  LATER. 

ENTER  ALBUM  TITLE  7C0P  SHOW/ANGELS  SIDE  ONE 
HOU  MANY  SELECTIONS  DO  YOU  WISH  TO  ADD  ?6 
AT  THE  -?"  ENTER  MINUTES  *  SECONDS  AS  FOLLOUS: 

MM , SS  (SUCH  AS  5,11  FOR  A  5:11  SELECTION) 

’24,50 

73,01 

73.50 

73,14 

72.57 

72.58 

FOR  "COP  SHOW/ANGELS  SIDE  ONE"  YQU"LL  NEED  ABOUT  40 

DO  YOU  WANT  TO  ADD  MORE  SELECTIONS  7YES 

ENTER  ALBUM  TITLE  ?CGP  SHOW/ANGELS 

HOU  MANY  SELECTIONS  DO  YOU  WISH  TO  ADD  72 

AT  THE  -'7"  ENTER  MINUTES  *  SECONDS  AS  FOLLOUS: 

MM , SS  (SUCH  AS  5,11  FOR  A  5:11  SELECTION) 

740.50 
72,07 

FOR  "COP  SHOU/ANGELS"  YOU'LL  NEED  ABOUT  42  :  57  OF 

DO  YOU  WANT  TO  ADD  MORE  SELECTIONS  ?YES 

ENTER  ALBUM  TITLE  7 ANGELS/THEME  SCENE 

HOW  MANY  SELECTIONS  DO  YOU  WISH  TO  ADD  713 

AT  THE  "7"  ENTER  MINUTES  *  SECONDS  AS  FOLLOUS: 

MM , SS  (SUCH  AS  5,11  FOR  A  5:11  SELECTION) 

72.48 
72,38 
76,37 

73.11 
74,03 
73,13 
73,31 

71.51 

72.52 
73,35 
73,10 

72.59 
72,47 

FOR  "ANGELS/THEME  SCENE"  YOU-'LL  NEED  ABOUT  43  :  15 
DO  YOU  WANT  TO  ADD  MORE  SELECTIONS  7N0 
OKAY  -  SEE  YOU  LATER. 


12.  OF  TAPE. 


:  50.  OF  TAPE. 


TAPE. 


OF  TAPE. 


Some  computers  not  only  play  the 
role  of  financial  managers  and  aux¬ 
iliary  homemakers,  they  can  also  step 
in  as  gracious  hosts,  especially  at  wine 
tasting  parties. 

First,  visit  your  favorite  beverage 
store;  a  good  wine  merchant  will  be 
more  than  happy  to  help  you  select  the 
wines  for  your  party.  From  my  own 
experience  I’ve  found  that  tasting  more 
than  six  wines  becomes  confusing  to 
your  guests;  and  more  than  ten  guests 
makes  the  tasting  scene  a  little  too 
crowded.  However,  line  30  of  the  pro¬ 
gram  allows  for  twelve  people  ( A$)  and 
eight  wines  (W$). 

Wine  tasting  parties  are  great  ice 
breakers  and  good  intellectual  mixers. 
Most  people  are  hesitant  about  passing 
judgment  on  wines  (until  they  see  how 
easy  it  is)  and  are  also  afraid  of  com¬ 
puters.  Therefore,  the  computer’s 
statements  at  the  beginning  and  at  the 
end  help  make  your  guests  a  little  less 
anxious.  Having  them  enter  their 
names  into  the  computer  as  soon  as  they 
arrive  is  the  best  way  I’ve  found  to 
make  them  feel  more  at  ease  with  the 
machine. 

Once  the  tasting  progresses  and  the 
guests  become  more  relaxed  (due  more 


to  the  wine),  they  become  more  profi¬ 
cient  in  entering  data.  The  computer 
corrects  them  in  a  very  nice  and  gentle 
manner  to  promote  better  relations 
between  people  and  the  mind  machine. 

I  have  to  admit  to  my  ego  trip  from 
seeing  my  non-computer  friends  mar¬ 
vel  at  the  way  the  machine  handles  the 
entry  of  “all  that  data”.  After  all,  ten 
people  scoring  six  wines  is  a  lot  of 
math! 

The  program,  written  for  a  TRS-80 
Level  II  with  16K,  will  probably  run  on 
just  about  any  machine.  CHR$(23), 
used  throughout  the  program,  puts  the 
video  printout  in  the  32-characters-per- 
line  mode.  For  the  actual  scoring  I 
changed  back  to  64  characters  per  line. 
If  you  use  the  32-character  mode, 
you’ll  have  to  play  around  with  the 
spacing  so  that  the  words  won’t  spill 
over  onto  the  next  line. 

The  subroutine  at  line  300  calculates 
a  running  average  of  the  scores  of  each 
wine  and  then  prints  them  out  at  the  end 
of  the  tasting.  You  could  add  a  bubble 
sort  subroutine  at  this  point  to  print  out 
the  wine  that  scored  first  and  then 
second  and  so  on  —  even  making  the 
computer  offer  some  statements  about 
each  wine  of  a  certain  rank. 


Also  note  that  the  TRS-80  allows 
hitting  the  Enter  key  (carriage  return)  as 
a  legal  entry.  If  your  machine  does  not 
allow  this,  use  a  variable  entry  instead. 

With  enough  memory,  you  could 
have  the  computer  store  each  person’s 
score  along  with  calculating  the  aver¬ 
age  for  each  wine.  Then,  in  the  final 
printout,  your  guests  could  see  what 
influence  their  score  had  on  the  rating 
of  the  wines.  This  revelation  is  not 
really  earth  shattering,  but  will  help 
them  feel  more  comfortable  when  they 
order  wines  or  find  themselves  con¬ 
fronted  with  a  computer. 

The  main  thing  to  watch  out  for  is  not 
to  let  anyone  approach  your  machine 
with  a  wine  glass  in  hand  —  even  an 
empty  one !  One  drop  of  the  vino  can  be 
disastrous  when  you  power  up  again. 
So  keep  your  computer  on  a  small  table 
away  from  the  wines  and  glasses. 

Your  guests  should  score  each  wine 
as  they  taste  it.  The  first  entry  always 
takes  the  longest  but  you  will  find  that 
as  the  night  progresses,  a  person  can 
enter  the  data  in  less  than  a  minute.  But, 
you  should  always  stand  by  just  in  case. 
So  it’s  best  that  you  and  the  computer 
consume  as  little  wine  as  possible;  let 
your  guests  have  all  the  fun.  □ 


Illustrations  by  Susan  Ross 


Program  Listing 

5  CLSt  Print  TAB(23)CHR$(23) "WINE  TASTE*' 

10  Print "WELCOME  TO  MY  WINE  TASTING  PARTY.  YOU  ARE  INVITED 
TO  TASTE  EACH  WINE  AND  THEN  SCORE  IT  ACCORDING  TO  ITS 
AROMA , BOQUET . FLAVOR , BODY  AND  FINISH.  I  WILL  RATE  EACH 
WINE  ACCORDING  TO  YOUR  SCORE.” 

15  Print”  +  +  THANK  YOU  FOR  COMING  +  +  ” 

20  Print”  *  *  ENJOY  YOURSELF  *  *  ” 

30  Clear  2000*  DIM  A$(12),A(8),H(8),W$(8) 

35  Input "rfOW  MANY  PEOPLE  ARE  ATTENDING” ; N 
40  FOR  I  *  1  to  N 

45  Print "PLEASE  ENTER  YOUR  NAME” i  Input  At (I) 

50  Next  I 

55  Input "HOW  MANY  WINES  APE  YOU  TASTING” ;P 
60  FOR  B  =1  to  P 

65  Print "PLEASE  ENTER  THE  NAME  OF  THE  WINE"*Input  W$(B) 

70  Next  B 

75  CLS i  Print  STRINGS (10, "*" ) ; "WINE  SCORE  SHEET”; 

STRINGS (10, "*” ) 

80  Input "ENTER  THE  NAME  OF  THE  WINE  YOU  HAVE  TASTED” ;T$ 

85  Input "WHO  IS  SCORING  THE  WINE"; 3$ 

90  FOR  I  =1  to  N 

95  IF  B$=A$ (I )  THEN  GOTO  115 

100  Next  I 

105  Print "ENTER  YOUR  NAME  AS  YOU  DID  EARLIER  THIS  EVENING. 

TO  SEE  GUEST  LIST  -  HIT  *ENTER*" i Input  CtGOSUB  500 
110  GOTO  85 
115  GOSUB  200 

120  Print  B$ ; YOU  SCORED” ; SI ; "FOR  ";T$ 

125  Print "I  WISH  TO  ADD  YOUR  DATA  TO  MY  FILES.  PLEASE  HIT 
♦ENTER*"*  Input  C*GOSUB  300 

130  Print "TYPE  1  TO  CONTINUE  SCORING  WINES iTYPE  2  TO  SEE 
FINAL  GRAND  AVERAGE  OF  WINES ."* Input  Y 
135  IF  Y-l  THEN  75 
140  FOR  B  =1  To  P 
145  Print  CHR$(23) ;W$(B) ,A(3) 

150  Next  B 

155  Print "HAVE  ALL  WINES  BEEN  TASTED  AND  SCORES  ENTERED? 

(1=YES  *#=N0 ) ” *  Input  Y 
160  IF  THEN  75 

165  CLS* Print  C HRS (23) * Print "THANK  YOU  FOR  COMING” 

170  Print”  *  *  GOOD  DRINKING  *  *  " 

175  GOTO  999 

200  FOR  B=1  to  P 

205  IF  T$«W$(B)  THEN  230 

210  Next  B 

215  Print "WINE  IS  NOT  FILED  AS  ENTERED.  HIT  *ENTER*  TO  SEE 
CORRECT  ENTRY"* Input  C*GOSUB  450 


220  GOTO  80 

230  Input "WHAT  IS  SCORE  FOR  AROMA  (4  POINTS  MAX ! ) " ; A1 

231  Input "WHAT  IS  SCORE  FOR  BOQUET  (4  POINTS  MAX!)”;31 

232  INPUT "WHAT  IS  SCORE  FOP  FLAVOR  (7P0INTS  MAX!)";C1 

233  Input "WHAT  IS  SCOPE  FOR  BODY  (3  POINTS  MAX!)";D1 

234  Input "WHAT  IS  SCORE  FOR  FINISH  (2  POINTS  MAXI)”|E1 

235  IF  Al>4  OP.  bl>4  OR  Cl>7  OR  Dl>3  OR  El>2  THEN  236 

236  Print "INPUT  ERROR!!  REDO!l"*GOTO  230 
240  S1-A1+B1+C1+D1+E1 *  M=10/S1 

245  IP  M>=.8  Print "VERY  POOR  WINE... SORRY  ABOUT  THAT!" 

246  IF  M<. 8  and  M>= . 7  Prinf'NOT  BAD!  THERE  ARE  WINES 
THAT  ARE  WORSE." 

247  IF  M£.7  and  M>=.6  Print "NICE  LITTLE  WINE.  GOOD 
FOR  EVERYDAY  DRINKING." 

248  IF  MC6  Print"*  *  EXCELLENT  SELECTION  *  *  SHOULD 
BE  IN  EVERY  WINE  CELLAR! J " 

250  RETURN 
300  FOR  B  =  1  to  P 
305  IF  T$=W$(B)  Then  315 
310  Next  B 

315  ON  B  GOTO  320,340,350,360,370,380,390,400 
320  K=K+1 *L=L+S1 
325  A(B )=L/K 

330  Print "GRAND  AVERAGE  FOR  ";T$;"  IS";A(B) 

335  Input "WHEN  READY  -HIT  *ENTER*" ;C * RETURN 
340  K1=K1+1*L1=L1+S1 
345  A ( B ) =Ll/Kl *  GOTO  330 
350  K2=K2+1 *L2=L2+S1 
355  A ( B ) SL2/K2  *  GOTO  330 
360  K3=K3+1 *L3=L3+S1 
365  A ( B ) =L3/K3  *  GOTO  330 
370  K4=K4+1 *L4=L4+S1 
375  A ( B ) =L4/K4  *  GOTO  330 
380  K5=K5+1 *L5-L5+S1 
385  A ( B ) =L5/K5  *  GOTO  330 
390  K6=K6+1 *L6=L6+S1 
395  A ( 3 ) =L6/k6  *  GOTO  330 
400  K7=K7+liL7=L7+Sl 
405  A ( B ) =L7/K7  *  GOTO  330 
450  FOP.  R*  1  to  P 
455  Print  W'S(B) 

460  Next  B 

465  Input "WHEN  READY  -HIT  *ENTER*" ;C *  RETURN 
500  FOR  I  =  1  to  N 
505  Print  AS (I) 

510  Next  I 

515  Input "WHEN  READY  -HIT  *ENTER" ;C  * RETURN 
999  END 


IP  .  <S  .  L  nc  . 


USE  OUR 

BUSINESS  SOFTWARE 
for 

GREATER  PROFIT 
through 

MORE  EFFICIENT 
OPERATION 
INCLUDES  : 

GENERAL  LEDGER 
ACCOUNTS  PAYABLE 
ACCOUNTS  RECEIVABLE 
ORDER  ENTRY 
INVENTORY  CONTROL 

This  totally  integrated,  single  entry 
system  is  easy  to  learn  and  easy  to 
use  because  it  is  "Menu"  oriented. 

The  software  requires  a  minimum  system 
consisting  of  48K  memory,  CRT, 
Printer,  dual  floppy  disc.  It  is  ready 
to  run  oh  the  following  systems  : 

v  DEC  PDP-11 

V  AM  -100 

V  PASCAL  MICROENGINE 
:•  ALTOS 

We  are  working  on  the  following 
systems  and  feel  we  can  install  our 
software  on  them  within  30  days  ARD: 
Data  General,  General  Automation,  LSI 
4/10,4/30,  Some  Z80  Systems 

Price  for  the  total  system  is 
$2995.00.  Order  a  user  manual  ($25.00 
plus  $2.00  shipping  &  handling)  or  the 
Demo  Floppy  &  Manual  ($65.00  plus 
$2.50  shipping  &  handling)  to  reserve 
this  price  for  you  beyond  our  expected 
price  increase. 


TO  ORDER  USE  OUR  TOLL  FREE  NUMBER 

1  800  437  4774 

VISA  AH)  MASTERCHARGE  WELCOME 
OR  SEND  CHECK  OR  MONEY  ORDER  TO 

P.  S.  INC,  619  NP  AVE,  BOX  2017 
FARGO,  H)  58107 
(PH)  701/235-8145 

L  n  a  . 

DEALER  INQUIRIES  INVITED 


Sample  Run 

WELCOME  TO  MY  WINE  TASTING  PARTY.  YOU  ARE  INVITED  TO  TASTE  EACH 
WINE  AND  THEN  SCORE  IT  ACCORDING  TO  ITS  AROMA , FLAVOR , B0QUET , BODY 
AND  FINISH.  I  WILL  RATE  EACH  WINE  ACCORDING  TO  YOUR  SCORE. 

+  +  THANK  YOU  FOR  COMING  +  + 

*  *  ENJOY  YOURSELF  *  * 

HOW  MANY  PEOPLE  ARE  ATTENDING  ?  2 
PLEASE  ENTER  YOUR  NAME 
?R0 BERT  KYLE 
PLEASE  ENTER  YOUR  NAME 
?JAMES  3R ENFIELD 

HOW  MANY  WINES  ARE  YOU  TASTING  ?  2 
PLEASE  ENTER  THE  NAME  OF  THE  WINE 
?PAU1  MASSON  BURGUNDY 
PLEASE  ENTER  THE  NAME  OF  THE  WINE 
7NAVELLE  BURGUNDY 

•ft*********  WINE  SCORE  SHEET  ********** 

ENTER  THE  NAME  OF  THE  WINE  YOU  HAVE  TASTED  ?  NAVELLE  BURGUNDY 
WHO  IS  SCORING  THE  WINE?  BOB  KYLE 

ENTER  YOUR  NAME  AS  YOU  DID  EARLIER  THIS  EVENING.  TO  SEE  GUEST 

LIST  -HIT  *ENTEP*? 

ROBERT  KYLE 

JAMES  3R ENFIELD 


WHO  IS  SCORING  THE  WINE?  ROBERT  KYLE 

WHAT  IS  SCORE  FOR  AROMA  (4  POINTS  MAXI)?  2 
WHAT  IS  SCORE  FOR  30QUET  (4  POINTS  MAXI)?  3 
WHAT  IS  SCORE  FOR  FLAVOR  (?  POINTS  MAXI )?  5 
WHAT  IS  SCORE  FOR  BODY  (3  POINTS  MAX!)?  2 
WHAT  IS  SCORE  FOR  FINISH  (2  POINTS  MAX!)?  2 

NOT  BADI  THERE  ARE  WINES  THAT  ARE  WORSE 

ROBERT  KYLE  YOU  SCORED  14  FOR  NAVELLE  BURGUNDY 

I  WISH  TO  ADD  YOUR  DATA  TO  MY  FILES.  PLEASE  HIT  * ENTER*  ? 

GRAND  AVERAGE  FOR  NAVELLE  BURGUNDY  IS  14 

TYPE  1  TO  CONTINUE  SCORING  WINES:  TYPE  2  TO  SEE  FINAL  GRAND 
AVERAGE  ?  1 

ENTER  THE  NAME  OF  THE  WINS  YOU  HAVE  TASTED?  PAUL  MASSON  BURGUNDY 
WHO  IS  TASTING  THE  WINE?  JAMES  BRENFIELD 

WHAT  IS  SCORE  FOR  AROMA  (4P0INTS  MAX!)?  3 
WHAT  IS  SCORE  FOR  BOQUET  (4  POINTS  MAX! )?  4 
WHAT  IS  SCORE  FOR  FLAVOR  (?  POINTS  MAXI)?  6 
WHAT  IS  SCORE  FOR  BODY  (3  POINTS  MAX!)?  3 
WHAT  IS  SCORE  FOR  FINISH  (2  POINTS  MAX!)?  2 

*  *  EXCELLENT  SELECTION  *  *  SHOULD  3S  IN  EVERY  WINE  CELLAR!! 
JAMES  BRENFIELD  YOU  HAVE  SCORED  18  FOR  PAUL  MASSON  BURGUNDY 

I  WISH  TO  ADD  YOUR  DATA  TO  MY  FILE.  PLEASE  HIT  *ENTER*? 

GRAND  AVERAGE  FOR  PAUL  MASSON  BURGUNDY  IS  18 

TYPE  1  TO  CONTINUE  SCOPING  WINES:  TYPE  2  TO  SEE  FINAL  GRAND 
AVERAGE?  2 

PAUL  MASSON  BURGUNDY  18 

NAVELLE  BURGUNDY  14 

HAVE  ALL  THE  WINES  BEEN  TASTED  AND  SCORES  ENTERED? (1= YES :/=NO ) 

?  1 

THANK  YOU  FOR  COMING 
*  *  GOOD  DRINKING  *  * 

READY- 


CIRCLE  20 


The  Logical  Choice 


January  23-26,  1980  •  Harumi  Exhibition  Center,  Tokyo 

For  complete  coverage  of  Mini-Microcomputers 
and  Data  Communications 


Growth  makes  this  $5  billion  market 

The  Logical  Choice 


The  combined  market  in  Japan  for  mini-microcom¬ 
puters,  microprocessors,  data  communications,  dis¬ 
tributed  data  processing,  components,  peripherals, 
subsystems,  equipment,  and  services  is  presently  at 
$5  billion  annually  and  growing  at  a  strong  25  per¬ 
cent.  The  inaugural  IMMM  show,  in  1979,  attracted 
over  10,589  key  buyers  and  specifiers  and  produced 
more  than  $2  million  on-the-floor  sales  for  exhibitors. 


The  Logical  Choice  for  Exhibitors 
to  increase  their  market  position! 


In  1980,  International  Microcomputers/Minicomput¬ 
ers/Microprocessors  and  Datacomm  Exposition  will 
again  give  exhibitors  a  substantial  audience  of  only 
decision-makers  —  prime  customers  from  manage¬ 
ment,  design,  production,  and  support  echelons.  In 
four  days,  sales  personnel  will  meet,  face-to-face, 
hundreds  of  key  buyers,  thus  avoiding  the  expensive 
and  time  consuming  “search  and  travel  missions” 
that  conventional  field-sales  methods  require. 


Again,  a  bonus  audience  of  electronics  manufac¬ 
turing  specialists  in  attendance  at  the  concurrent 
INTERNEPCON  JAPAN/ SEMICONDUCTOR  INTER¬ 
NATIONAL  Exhibition  will  come  to  the  IMMM  Japan/ 
Datacomm  Exposition  to  enhance  their  automated 
production  and  business  capabilities. 


The  Logical  Answer 

for  Visitors 


to  examine,  compare,  and  procure  the  latest  in 
minicomputers,  microcomputers,  microprocessors, 
data  communications  systems,  peripherals,  subsys¬ 
tems,  components,  and  services  needed  for  expand¬ 
ing  business.  IMMM/Datacomm  is  a  must  for  OEM 
manufacturers  from  all  industries,  commercial  and 
financial  establishments,  service  industries  and  insti¬ 
tutions,  design  engineers,  technical  consultants, 
government  officials  and  executives  —  people  who 
have  the  responsibility  of  evaluating,  selecting,  and 
buying  the  products  and  services  needed  to  be  com¬ 
petitive  in  world  markets.  Plan  now  to  attend  IMMM 
’80  Japan/Datacomm. 


Organized  by:  A  leader  in  organising 

ISCiVl  exhibitions  and  conferences 
worldwide. 

Plan  Now  to  Participate 

For  details  on  participating,  contact  the  nearest  office: 


Industrial  &  Scientific 
ConL  Management,  Inc. 
222  West  Adams  St. 
Chicago,  Illinois  60606 
Phone:  (312)  263-4866 
Telex:  256148 


ISCM,  Ltd. 

Blissful  Bldg.,  Rm.  704 
247  Des  Voeux  Rd. 
Central  Hong  Kong 
Phone:  5-430462 
Telex:  83068 


Kiver  Communications  S.A, 
(U.K.  Branch  Office) 
171/185  Ewell  Rd. 

Surbiton,  Surrey 
KT6  6AX,  England 
Phone:  01-390-0281 
Telex:  929837 


ISCM  Japan 
Kokado  Bldg. 

1-3-18  Akasaka 
Minato-ku,  Tokyo 
107,  Japan 
Phone:  03-585-8321 
Telex:  27280 


ISCM,  Ltd. 
D6A-4th  Floor 
International  Bldg 
360  Orchard  Rd. 
Singapore  9 
Phone:  235-9145 
Telex:  RS  25932 


Battling  The 
Gas  Pump  Blues 


BY  FRED  E.  GUTH 


Gas  shortages  and  rising  prices  make  us  stop  and  think  before 
taking  long  drives.  Now  we  ask,  “Can  we  afford  it?”  For 
instance,  I  drive  from  Missouri  to  Michigan  each  year  and  was 
curious  to  learn  how  much  it  costs  now.  Salesmen  on  the  road  would 
also  be  interested  in  these  figures,  particularly  when  making  up  their 
income  tax  returns. 

Two  articles  in  our  St.  Louis  Globe  Democrat  inspired  the  follow¬ 
ing  program.  In  the  first  article,  a  graph  showed  that  gasoline  costs 
have  soared  250%  since  1972.  We  paid  just  38.9  cents  per  gallon  in 
1972,  and  today  it’s  at  least  97.9  cents! 

For  the  second  article,  the  Globe  rented  a  new  Cadillac  Seville  with 
a  built-in  gas  and  mileage  computer.  To  make  the  test  authentic,  the 
reporter  took  along  a  Missouri  state  trooper.  This  program  is  based  on 
the  test  results. 

At  50  miles  per  hour  highway  driving,  the  Seville  got  its  most 
efficient  mileage.  At  45,  it  required  2-1/2%  more  gas;  and  at  40,  5% 
more. 

On  the  higher  side,  the  tests  were  more  dramatic.  At  55,  the  Seville 
consumed  5%  more;  at  60,  17%  more;  at  65,  25%  more;  at  70,  33% 
more;  and  at  75,  43%  more! 

So,  I  stuck  to  50  mph  on  my  trip!  □ 


Illustration  by  Josh  Randall 


Sample  Run 

1972 


Sample  Run 

1979 


THE  TOTAL  MILEAGE  MILL  BE  -  825  MILES 

AT  50  MPH  THE  HILES-PER-GALLONS  ARE  -  17  MPG 

OIL  CONSUMPTION  IS  -  2  QTS/M 

AN  AVERAGE  GAL.  OF  GAS  COSTS  -  $  .  389 

AVERAGE  QT.  OF  OIL  COSTS  -  $  .  45 


THE  TOTAL  MILEAGE  HILL  BE  -  825  MILES 

AT  50  MPH  THE  MILES-PER-GALLONS  ARE  -  17  MPG 

OIL  CONSUMPTION  IS  -  2  QTS/M 

AN  AVERAGE  GAL.  OF  GAS  COSTS  -  $  .  979 

AVERAGE  QT.  OF  OIL  COSTS  -  $  .  95 


AVG. 

SPEED 

EST.  GAS 
GALS. 

USAGE 

COST 

EST.  OIL  USE 
QTS.  COST 

TOTAL 

GAS/OIL 

GAS 

STOPS 

HOURS 

REQ-D. 

AVG. 

SPEED 

EST.  GAS  USAGE 
GALS.  COST 

EST.  OIL  USE 
QTS.  COST 

TOTAL 

GAS/OIL 

GAS 

STOPS 

HOURS 

REQ-D. 

40 

50.  96 

$ 

19.  82 

1.  65 

$  .  74 

$  20.  56 

3 

20.  62 

40 

50.  96 

$ 

49.  89 

1.  65 

$ 

1.  57 

$  51.  46 

3 

20.  63 

45 

49.  74 

$ 

19.  25 

1.  65 

*  74 

$  20.  09 

2 

18.  22 

45 

49.  74 

$ 

48.  7 

1.  65 

$ 

1.  57 

$  50.  27 

2 

18.  22 

50 

48.  52 

$ 

18.  38 

1.  65 

$  .  74 

$  19.  62 

2 

16.  5 

50 

48.  53 

t 

47.  51 

1.  65 

* 

1.  57 

$  49.  08 

3 

16.  5 

55 

50.  96 

$ 

19.  82 

1.  65 

*  .  74 

$  20.  56 

2 

15 

55 

50.  96 

$ 

49.  89 

1.  65 

* 

1.  57 

*  51.  46 

2 

15 

SO 

56.  78 

$ 

22.  09 

1.  65 

$  .  74 

$  22.  82 

2 

13.  75 

60 

56.  78 

$ 

55.  59 

1.  65 

$ 

1.  57 

$  57.  16 

2 

12.  75 

65 

60.  66 

$ 

22.6 

1.  65 

$  .  74 

$  24.  24 

4 

12.  69 

65 

60.  66 

$ 

59.  29 

1.  65 

$ 

1.  57 

$  60.  96 

4 

12.  69 

70 

64.  54 

$ 

25. 11 

1.  65 

$  .  74 

%  25.  85 

4 

11.  79 

70 

64.  54 

$ 

62.  io 

1.  65 

1.  57 

$  64.  75 

4 

11.  79 

75 

69.  4 

$  27 

1.  65 

$  .  74 

%  27.  74 

4 

11 

75 

69.  4 

$ 

67.  94 

1.  65 

$ 

1.  57 

$  69.  51 

4 

11 

10  REM  AUTO  GfiS/QIL  CONSUMPTION  PROGRAM  --  FOR  HIGHWAY  DRIVING 

20  REM 

38  REM  FILENAME  "AUTOGAS/CQS" 

40  CL£AR1000:CLS:PRINTCHR*<23>;“TURN  ON  THE  LINE  PRINTER" 
50  INPUT"PRESS  ENTER  TO  CONTINUE  -“;S 

Program 

60  CLS 

308  PRINT :PRINT"THE  QUESTIONS  BELOW  ARE  FOR  A  HIGHWAY  TRIP" 
310  PRINT: INPUT"HOW  MANY  MILES  WILL  'YOU  DRIVE  BA 

320  INPUT "WHAT  IS  YOUR  'MILES  PER  GALLON  '  RATE  -",6B 

330  INPUT"HOW  MANY  GALLONS  DOES  YOUR  GAS  TANK  HOLD  -“;BC 

Listing 

340  M'UT"HOW  MANY  QUARTS  OF  OIL  PER  1080  MILES  DOES  YOUR  CAR  USE  -";BD 

350  HHn'HVtRffct  C0S1  PER  GHlUN  -  FOR  GAS  IS  ";BE 

355  INPUT'HVLRffiE  COST  FtR  QUHRT  -  FOR  OIL  IS  -"iBkHRlHI 

360  LPRINI’IIE  TOTAL  HILEftt  HILL  l£  -'^MiOAmS" 

370  LPRIHT'Al  50  IfH  1HE  N1LES-PER-GH10NS  ORE  -V(I0(40);B8W 

388  LPRirOlL  CONSWfUON  IS  1(0(48); BD'dlS/H" 

382  LPRirffl  OYERAli  OH.  IF  OHS  COSTS  1(0(41),  T,tE 

384  LPRIN1  "OVERAGE  01.  CF  OIL  COSTS  -Mt6(41);*$,;0E:LRRII(I*  “ 

396  LPKlNTAVti  ";  110(7);  "ESI .  (AS  USAGE",  lf0(26), "ESI.  OIL  USE";  1(0(42);  "Wifi",  1(0(51);  W,  1(0(57),  "HOURS" 

408  LPR1NTSPEED",  100(7);  "GALS. ";  100(17);  "G0S1 ";  100(26);  "G1S. ";  1(0(33),  "COSl ";  1(0(41);  "(0SA)lL"i  1(0(50);  "STOPS";  1(0(57);  "REQ'D. " 

410  LRR1N1S1R1NG$(63,4j) 

420  PRINI’TH  C0IW1ER  IS  CALMAUNG  -  4  PR1H11NG  OUT" 

438  10=40 

440  DHlft  185  »  1825  ,  1  ,  185  ,  117,  125,  133  ,  143 

538  U=GB/BC 

450  REflDZX 

540  S1=1NKU)+1 

468  F=(6(H8)*2< 

558  U=OH/I0 

478  G0=lHl((Ff  005)*100)7100 

568  TT=1H1(((H.  005)*100)/108 

480  2=0E«(£ 

638  LPklHWi;  Tfl0(6);  (0;  1(0(14);  ltd  lfB(25);  00;  100(32); 

495  (jC=lKK(Z+.  005)*100)/180 

VOC;  1(0(41); TIC; 100(51);  ST; 100(56); 11 

508  H=(K#8(M000 

648  HH0+5 

565  0Q=1NI((H+.  085)*100)/100 

642  lFlfK-75T(£N(jOlO440 

518  Y=O0*8F 

645  LPR1N)51R1NG$(63,45) 

515  0C=1H1((Y+.  005)*100)/100 

650  F0R]=HQ15:LPRir  ":l€Xl 

520  1C=«HOC 

668  END 

BY  RINALDO  F.  PRISCO 


the 
Races 


Tough  Tony  the  Tipster  called  me 
several  weeks  ago.  “Why  don’t 
youse  wise  up,  kid,  and  put  that  com¬ 
puter  of  yours  to  work?”  he  said. 

“What  do  you  mean  Tony?  It  is 
working,’’  I  replied. 

“Look  kid,  there  ain’t  no  percentage 
playing  dumb  games  with  a  dumb 
machine.  Here  kid,  let  me  lay  it  on  the 
line  for  you.” 

That  conversation  was  the  beginning 
of  a  new  project  for  me.  Tough  Tony 
told  me  that  he  represented  a  certain 
party  who  owned  a  stable  of  racing 
horses.  This  party  wanted  to  buy  a 
computer  to  help  determine  whether  his 
horses  would  win  their  races.  He 
needed  help  since  he  didn’t  know  a 
thing  about  computers  or  program¬ 
ming.  Would  I  help? 

I  explained  to  Tony  that,  although  I 
was  knowledgeable  about  program¬ 
ming,  probabilities  and  statistics,  I 
knew  nothing  about  handicapping 
horse  races.  “No  problem,  kid;  I’ll  tell 
you  all  youse  need  to  know.  ”  With  that 
statement,  my  education  in  handicap¬ 
ping  horse  races  began.  Tony  provided 
me  with  his  first-hand  knowledge  as 
well  as  with  every  book  on  handicap- 

Rinaldo  Frisco  is  an  associate  profes¬ 
sor  of  mathematics  at  the  State  Uni¬ 
versity  of  New  York  at  Oswego. 


ping  that  our  local  bookstore  had  — 
many  more  than  I  thought  existed.  New 
terms  entered  my  vocabulary:  form, 
class,  allowance  race,  claiming  race, 
maidens,  tote  board,  hedging,  pace, 
overlays,  furlongs, .... 

Eventually  several  versions  of  the 
program  Otter  (Off  To  The  Races)  were 
developed.  They  were  meant  to  be 
rough  attempts  to  handicap  a  race  using 
only  the  entered  horse’s  past  perform¬ 
ances  as  published  in  a  typical  racing 
form.  Some  versions  neglect  many  im¬ 
portant  factors  such  as  class,  pace, 
weight,  jockey  and  so  on,  concentrat¬ 
ing  on  speed.  Other  versions  are  fairly 
extensive. 

Tony  became  a  daily  visitor  once  the 
programs  were  up  and  running.  Even¬ 
tually,  he  called  me  and  said,  “Don’t 
youse  touch  or  change  the  last  pro¬ 
gram!”  It  was  picking  the  first  or 
second  horse  in  each  race  consistently. 
Of  course,  this  could  have  been  simply 
a  coincidence.  I  told  Tony  that  we 
would  need  many  more  tests  before  we 
could  reach  any  conclusions  regarding 
the  program’s  ability  to  handicap  a  race 
well  enough  for  us  to  have  any  confi¬ 
dence  in  its  predictions. 

The  Program 

Handicapping  a  horse  race  is  re¬ 
markably  complex.  The  most  that  can 


be  realistically  hoped  for  is  that  a  pro¬ 
gram  give  the  user  an  “edge”.  This 
edge  should  be  sharpened  and  honed 
during  the  course  of  the  program’s  de¬ 
velopment.  Payoffs  in  horse  racing  are 
based  upon  the  collective  abilities  of  all 
players  to  make  judgements.  A  rational 
player  will  have  a  definite  edge  over 
players  using  hunches,  names  or  pins  to 
make  judgements. 

Any  handicapping  program  will  use 
numerical  quantities  to  rate  various 
qualities  of  the  entries.  Different  quali¬ 
ties  and  numerical  rating  systems  dis¬ 
tinguish  one  program  from  another. 
Otter  can  be  easily  modified  to  use  any 
such  variation.  Several  versions  have 
been  developed  based  on  one  method  or 
another.  The  more  factors  considered 
by  a  method,  the  better  should  be  the 
results.  There  is  a  trade-off  here.  While 
consideration  of  more  factors  will  re¬ 
sult  in  better  predictions,  entering  all 
the  required  data  will  result  in  greater 
expenditures  of  time. 

This  article’s  version  of  Otter  has  the 
advantage  of  using  a  relatively  small 
amount  of  data.  It  cuts  through  all  the 
possibilities,  getting  down  to  the  fun¬ 
damental  quality  of  speed. 

Past  performance  charts  give  speed 
ratings  and  variances  for  each  of  the 
recent  races  of  each  of  the  starters. 
Otter  computes  their  weighted  mean 


Illustration  by  Dolores  Brandow 


Program  Listing 


10 

RE  M 

OTTER 

20 

REM 

Weighted  Speed  Version 

30 

REM 

40 

REM 

Rinaldo  F.  Prisco 

50 

REM 

R.D.  #7  Edgebrook 

60 

REM 

Oswego,  NY  13126 

70 

REM 

80 

REM 

All  Rights  Reserved 

90 

REM 

100  DIM  X(15) ,S(15) ,C(15) ,M(15) ,P(15) ,L(15) ,T(15) 

110  DIM  H$ (18) , T$ (20) ,R$ (2) , D$ (18) ,N$ (270) 

120  INPUT  "IS  DATA  ON  DISK?  ",Y$:IF  Y$ ( 1 , 1 ) <>"Y"  THEN  190 
130  INPUT  "WHICH  FILE?  ",F$ 

140  OPEN  # 0 , F $ : READ  #0 , T$ , D$ , R$ ,F , N 
150  READ  #0,N$ 

160  FOR  1=1  TO  N : READ  #0, X (I) , S (I) ,L (I) ,M (I) :NEXT 
170  CLOSE  #0 :FOR  1=1  TO  N: P (I) =1 :NEXT 
180  GOTO  520 

190  INPUT  "Which  track?  ",T$ 

200  INPUT  "What  date?  ",D$ 

210  INPUT  "Which  race?  ",R$ 

220  INPUT  "How  many  furlongs?  ",F 

230  INPUT  "How  many  horses  entered?  ",N 

240  !:! 

250  FOR  1=1  TO  N 

260  ! "Enter  name  of  horse",I,":  ", 

270  INPUT  " " , H$ : L (I ) =LEN (H$) :N$((I-1)*18+1) =H$ 

280  P(I)=I 

290  ! "Enter  Morning  Line  on  ",H$,":  ", 

300  INPUT  " " , M (I) : PRINT 

310  NEXT  I 

320  FOR  1=1  TO  N 

330  H$=N$ ( (1-1) *18+1 , (1-1 ) *18+L(I) ) 

340  !CHR$ (11), TAB (20) ,H$ , "  PP#",P(I) 

350  FOR  J=1  TO  6 3 : PRINT  "*",:NEXT  J 
360  PRINT: PRINT 

370  INPUT  "How  many  prior  races?  ",M:IF  M<11  THEN  390 
380  M=8 : STOP 
390  PRINT: PRINT 
400  X=0:S=0 

410  FOR  J=0  TO  M-1 : ! %2I , J+1 , " )  ", 

420  INPUT1  "SPEED  FACTOR:  " ,D: !TAB (30) , 

430  INPUT  "VARIANCE:  ",T 
440  T=T+D 

450  X=X+ (M-J) *T:S=S+T*T* (M-J) 

460  NEXT  J 

470  M=M*(M+1)/2 

480  S (I) =SQRT ( (M*S-X*X) / (M*M) ) 

490  X ( I ) =X/M 
500  PRINT 
510  NEXT  I 

520  REM  -  SIMULATE  RACES  - 

530  INPUT  "ENTER  A  NUMBER  BETWEEN  0  AND  1  ",Z:Z=RND(Z) 

540  Q=1 00 

550  FOR  1=1  TO  N:C (I ) =0 : NEXT  I 

560  PRINT  #P,"And  they  are  off  and  running!!  ", 

570  FOR  K=1  TO  Q 
580  FOR  1=1  TO  N 

590  A=RND (0) :Z=4. 91* (AA . 14- (1-A) A. 14) 

600  T (I) =X(I) +Z*S (I) 

610  NEXT  I 

620  W=1 :M=T(1) :FOR  1=2  TO  N 

630  IF  T ( I ) <=M  THEN  64 0 : W=I : M=T (I ) 

640  NEXT  I:C(W) =C (W) +1 : !W, 

650  NEXT  K 

660  REM  -  SORT  - 

670  FOR  1=1  TO  N-1 :FOR  J=I+1  TO  N 

680  IF  C(P(I) )>=C(P(J) )  THEN  690 : T=P  (I)  : P  (I) =P ( J) : P ( J) =T 
690  NEXT  J : NEXT  I 
700  !:! 

710  INPUT  "Hard  copy?  ",Y$:IF  Y$(1,1)="Y"  THEN  P=2 

continued 


(more  recent  races  carry  more  weight) 
and  standard  deviation,  providing  a 
speed  profile  for  each  starter.  These 
profiles  are  then  used  in  simulated 
races.  Otter  simulates  100  (easily 
modified  to  any  number)  races.  Their 
results  are  used  to  estimate  the  fair  odds 
for  each  horse  winning  the  actual  race. 
The  horses  are  then  sorted  according  to 
these  odds,  with  the  most  favored  entry 
listed  first. 

Objective 

The  objective  of  the  program  is  not  to 
pick  the  horse  with  the  “best”  chance 
of  winning.  Rather,  Otter  searches  for 
the  most  “underrated”  horse  in  the 
race.  In  player  parlance,  this  is  called 
the  best  overlay  bet. 

Otter  computes  the  best  overlay  bet 
by  comparing  its  computed  odds  with 
the  “morning  line,”  the  odds  as  esti¬ 
mated  in  various  scratch  sheets  and 
newspapers.  A  player  at  the  track 
would  use  the  tote  board  to  determine 
the  most  recent  track  odds.  The  largest 
of  the  ratios  of  the  track  odds  to  the 
computed  odds  is  the  best  overlay  bet. 
In  the  long  run,  playing  underrated 
horses  should  result  in  larger  expected 
payoffs  per  investment. 

Running  the  Program 

You  have  the  past  peformances  of 
the  entries  in  the  race  before  you  (avail¬ 
able  at  many  newstands).  Load  Otter, 
enter  RUN  and  you  are  off!  Once  all  the 
data  is  entered,  the  simulated  races 
commence.  After  each  is  run,  the  post 
position  of  the  winner  will  print  out  to 
the  screen.  (This  would  be  quite  strik¬ 
ing  if  we  added  a  graphics  routine.) 

After  several  minutes,  the  results  are 
in.  You  then  await  the  final  printout, 
almost  like  being  at  the  track  itself. 
Some  typical  printouts  are  included  in 
the  Sample  Runs.  In  these  examples  we 
used  the  actual  finishing  position  of 
each  starter  in  place  of  their  post  posi¬ 
tions  as  well  as  the  actual  track  odds  in 
place  of  the  morning  line.  This  was 
done  to  compare  the  predicted  results 
with  the  actual  results.  In  some  in¬ 
stances  we  fared  pretty  well;  in  others 
we  bombed  out.  As  stated  before,  all 
we  can  hope  for  is  an  “edge”. 

You  might  be  interested  to  know  that 
Tough  Tony  and  friend  now  have  a 
microcomputing  system  of  their  own 
using  a  super  version  of  Otter.  More¬ 
over,  I  think  that  Tony’s  ideas  about 
computers  have  changed.  The  last  time 
that  I  saw  him  the  races  were  over  and 
he  was  playing  Startrek,  “rubbing  out” 
Klingons.  □ 


Program  Listing  continued 

720  !#P: !#P, "Race  #" , R$ , TAB ( 25) , T$ , "  ",D$, 

730  !#P,TAB(57) ,F,"  furlongs" 

740  FOR  1=1  TO  69:  PRINT  #P,"  =  ",:NF,XT  I :  PRINT  #P 

750  !#P,"  NAME  PP  #WINS  ODDS", 

760  !#P,"  MLINE  OL" 

770  FOR  1=1  TO  69: PRINT  #P,"-",:NEXT  I: PRINT  #2 
780  FOR  J=1  TO  N 
790  I=P(J) 

800  !#P,N$ ( (1-1 ) *18  +  1 ,1*18)  , 

810  !#P,%3I,I,%9I,C(I) , 

820  IF  C(I)<>0  THEN  850 

830  ! #P,TAB ( 39) ," - ",TAB(50) ,%6F2,M(I) ,TAB(65) ," - " 

840  GOTO  890 

850  C  (I)  =  (Q-C  (I)  )  /C  (I) 

860  IF  C(I)<>0  THEN  0=M(I)/C(I)  ELSE  0=0 
870  IF  0<01  THEN  880:01=0:B=I 
880  !#P,%13F2,C(I) ,M(I) ,0 
890  NEXT  J: ! #P 

900  !#P, "Best  Overlay  Bet:  " ,N$ ( (B-1 ) *  1 8  +  1 , (B-1 ) *1 8+L (B) ) 
910  INPUT  "SAVE  DATA?  ",Y$:IF  Y$ (1 , 1 ) <>"Y"  THEN  980 
920  INPUT  "WHICH  FILE?  ",F$ 

930  IF  FILE (F$) =-1  THEN  CREATE  F$,3 
940  OPEN  #0,F$ 

950  WRITE  #0 , T$ ,D$ , R$,F,N,N$ 

960  FOR  1=1  TO  N: WRITE  #0,X (I) ,S (I) ,L (I) ,M (I) 

970  NEXT  I: CLOSE  #0 

980  INPUT  "ANOTHER  PRINTOUT?  ",Y$ 

990  IF  Y$ ( 1 , 1 ) ="Y"  THEN  720 

Sample  Run 


Race  #2  BELMONT  PARK  7/18/79  8.5  furlongs 

NAME  PP  #WINS  ODDS  MLINE  OL 


All  Our  Hopes 

3 

22 

3.55 

4.90 

1.38 

Sharmadidit 

6 

18 

4.56 

21.50 

4.72 

Mr .  Champ 

2 

17 

4.88 

5.00 

1  .02 

Trout  Mound 

5 

14 

6.14 

5.50 

.90 

Jungle  Bells 

4 

10 

9.00 

9.00 

1.00 

Slow  to  Anger 

1 

8 

11.50 

13.00 

1.13 

Altar 

7 

7 

13.29 

2.10 

.16 

Artful  Pretender 

8 

4 

24.00 

14.00 

.58 

Eleven  Shamrocks 

9 

0 

— 

11.00 

— 

Best  Overlay  Bet: 

Sharmadidit 

Race  #3 

BELMONT 

PARK  7/18/79 

8.5 

furlongs 

NAME 

PP 

#WINS 

ODDS 

MLINE 

OL 

Rolling  Stone 

1 

33 

2.03 

1.90 

.94 

Prospector's  Joy 

7 

27 

2.70 

8.00 

2.96 

Forecast  Clear 

3 

15 

5.67 

3.10 

.55 

New  Appeal 

8 

15 

5.67 

16.60 

2.93 

Modest  Ridge 

4 

5 

19.00 

22.70 

1.19 

Loudly 

6 

2 

49.00 

22.20 

.45 

L 1 Arsouille 

5 

1 

99.00 

9.10 

.09 

I  Celebrate 

2 

1 

99.00 

6.70 

.07 

Think  Tomorrow 

9 

1 

99.00 

8.60 

.09 

Best  Overlay  Bet:  Prospector's  Joy 


Orders  received  by  6:00  p.m.  shipped 
within  3  days  on  Master  Charge,  Visa, 
Certified  Check  or  Money  Order. 
Personal  Checks  require  14  days  to 
clear.  No  C.O.D.  Collect  calls  not 
accepted.  All  Hardware  warrented  for  90  days. 
Software  guaranteed  for  replacement  only. 

Prices  subject  to  change  without  notice. 

Automated 
„  Computer 
Software  service 

(615)  244-2798 

Division  of 

SEmputar  UiEild  iNC. 

625  Main  Street  •  Nashville,  TN  37206 


ORDER  NOW  AND  SAVE! 

Send  Check  or  Money  Order  payable  to  — 

ACS*  625  Main  Street  •  Nashville,  TN  37206 

Quan.  Description  Unit  Price  Total 


HANDLING  CHARGE  $1.50 

TENN.  RES.  ADD  6%  SALES  TAX  TOTAL 

Name 


Address 
City  _ 


State 


□  Check 

□  Money  Order 

□  MasterCharge 

□  Visa 

Card  No.  _ 


Exp.  Date- 


Good  news  from  ACS. ..Now  all  types  of  disk  drive  storage  systems 
are  available  at  low  cost  to  you  and  completely  compatable  with 
your  TRS-80.™ 

i  8"  IMI  HARD  DISK  DRIVE  complete  with  power  supply  and 

interface  for  TRS-80™  and  converted  3.0  DOS . $4,995.00 

I  2  Full  Size  8"  FLOPPY  DISK  SINGLE  SIDED  DRIVES  w/case 
and  power  supply  for  TRS-80™  with  converted  3.0  D0S....S1 ,295.00 

•  2  Full  Size  8"  FLOPPY  DISK  DOUBLE  SIDED  DRIVES  w/case 
and  power  supply  for  TRS-80™  with  converted  3.0  DOS. ...Si ,695.00 


•  L0B0  EXPANSION  INTERFACE  to  adapted  5",  8"- single  and 

double  sided  drives  to  TRS*80r"  . $400.00 

•  LOBO  MINI  5"  DISK  DRIVES . $375.00 

I  PERTEC  MINI  5"  DISK  DRIVES . $375.00 

•  MPI  MINI  5"  DISK  DRIVES . $375.00 

4-DRIVE  CABLE . $35.00.  Add  $20.00  for  3.0  DOS  disk. 

(Apple  Drives  available  soon  at  comparable  prices.) 

I  REFER  TO  OPPOSITE  PAGE  FOR  DETAILED  INFORMATION 


TRS-80™Owners  .  . .  ACS  makes  it  easy  for  you 

to  add-on  disk  storage  with  mini-disk  storage 
systems  •  •  •  ALS0...HARD  disk  and  full  size  floppys. 


How  to  write  for 
Personal  Computing 


You’ve  written  the  programs  we  want  to  publish. 

You  —  the  Personal  Computing  readers  —  are  using 
your  computers  in  businesses,  homes,  offices  and 
schools.  Other  readers,  just  as  software-hungry  as  you, 
are  eager  to  try  out  your  programs,  your  applications 
and  your  techniques.  So  why  not  share  what  you’ve 
done  by  submitting  an  article  to  PC? 

It’s  easier  than  you  might  think.  Remember:  we’re 
more  interested  in  practical  programs  and  useful  ap¬ 
plications  than  in  fancy  prose.  And  our  editorial  staff 
stands  ready  to  help  with  any  problems  you  encount¬ 
er  in  writing  your  article;  just  give  us  a  call  at  (617) 
232-5470. 

Here  are  some  handy  guidelines  to  help  you  get 
started. 

First,  decide  what  kind  of  article  you  want  to 
write.  Do  you  have  a  business  program  that  will  help 
an  executive,  salesman,  doctor,  lawyer  or  shopkeeper 
function  more  efficiently?  Think  about  how  business¬ 
es  can  benefit  from  microcomputers  -  not  only  in  the 
obvious  areas  of  inventory,  accounting  and  payroll, 
but  in  all  departments  and  levels  right  up  to  the  presi¬ 
dent’s  desk.  Financial  and  marketing  analysis,  time 
management,  planning,  material  handling,  product  de¬ 
sign  and  cost  accounting  are  areas  ripe  for  creative 
programming. 

How  do  you  use  your  computer  for  home  and  per¬ 
sonal  applications  in  your  living  room,  kitchen,  study 
or  den?  Again,  think  beyond  the  obvious  areas  of 
checkbook  balancing  and  budgeting  (though  these 
areas  are  far  from  exhausted)  to  other  applications. 
Hobbies,  home  management,  household  inventory, , 
gardening  and  landscaping,  personal  income  and  ex¬ 
pense  analysis,  personal  mailing  lists  and  word  pro¬ 
cessing  are  just  a  few  ideas  to  spark  your  imagination. 

What  education  programs  have  you  written  for 
children,  adults,  professionals,  businessmen  and 
teachers?  Computers  can  not  only  teach  children  basic 
subjects  such  as  spelling,  math,  geography,  economics, 
civics,  grammar,  literature  and  science,  but  can  help 
adults  review  or  sharpen  skills  in  these  areas  as  well. 
How  else  can  computers  function  in  or  out  of  the 
classroom  to  aid  learning?  To  help  teachers  and  ad¬ 
ministrators? 

Are  you  proficient  in  some  programming  tech¬ 
nique  or  special  computer  area  you  could  explain  in 


a  tutorial  article ?  How  do  you  save  time,  money,  com¬ 
puter  memory  or  frustration  when  programming  or 
using  your  computer?  Others  can  benefit  from  the 
same  techniques  you  use. 

Computer  games ,  history ,  humor  and  fiction  are 
other  areas  rich  in  article  and  story  ideas. 

Your  second  step  is  to  write  the  text  of  the  article. 
Remember,  readers  aren’t  familiar  with  your  program. 
So  explain  in  detail  what  the  program  does  and  how  it 
does  it.  Include  here  the  overall  structure  of  your  pro¬ 
gram  as  well  as  any  special  algorithms  or  routines 
you’ve  used.  Give  suggestions  for  modifying  or  ex¬ 
panding  the  program  for  other  applications,  other 
businesses  or  other  situations. 

Third,  prepare  your  supporting  documentation.  In¬ 
clude  at  least  a  program  listing  and  one  or  two  sample 
runs,  and  add  program  notes  to  explain  any  special 
commands  used  or  other  special  features  of  your  pro¬ 
gram.  Use  charts,  diagrams,  figures  and  photos  if  they 
help  explain  your  program  and  its  use. 

Finally,  mail  your  manuscript.  Address  it  to  Editor, 
Personal  Computing  Magazine,  1050  Commonwealth 
Ave.,  Boston,  MA  0221 5. 

A  few  suggestions:  All  submissions  should  be  origi¬ 
nal,  typed  (i not  all  CAPS),  double-spaced  and  neat. 
Please  include  your  name  and  address  on  the  first  page 
of  the  article  and  enclose  a  self-addressed,  stamped 
envelope  for  return  of  material. 

Since  we  photograph  program  listings  and  sample 
runs  exactly  as  you  send  them  to  us  for  publication 
in  the  magazine,  please  be  sure  you  use  a  fresh  ribbon 
for  computer  printouts.  If  you  don’t  have  a  printer, 
you  can  type  your  listings  single  spaced;  but  again,  be 
sure  you  use  a  new  ribbon.  (If  your  program  relies 
heavily  on  graphics,  you  can  photograph  sample  runs 
from  your  CRT.  But  take  care  to  avoid  distortion  due 
to  the  curve  of  the  screen.) 

Feel  free  to  call  us  if  you  have  any  questions  or 
want  to  discuss  specific  ideas.  We  can  give  you  feed¬ 
back  and  suggest  appropriate  slants  and  approaches. 

We’re  always  looking  for  fresh,  original  ideas.  While 
these  guidelines  will  help  you  in  preparing  material  for 
Personal  Computing ,  don’t  assume  we  don’t  want  your 
idea  just  because  it’s  not  mentioned  here.  Let  us  and 
our  readers  know  what  you  \ re  doing  with  your  com¬ 
puter. 


COMPUTER  CHESS 


HARRY  SHERSHOW  — Dept.  Editor 
MORRIS  MILLER  —  Chess  Annotater 


“Rating  Chess  Challenger  7”  BY  DAVE  WELSH 


(This  month’s  chess  section  begins  an 
analysis  of  a  stand-alone  chess  device 
( Chess  Challenger).  The  author,  David 
E.  Welsh ,  is  a  consulting  mechanical 
engineer  from  Los  Angeles ,  CA  90027 , 
3124  Rowena  Ave.  He  is  a  strong 
chess  player  (last  USCF  rating:  1952.) 
Because ,  he  says ,  he  has  found  it  diffi¬ 
cult  to  swallow  the  advertising  claims 
from  the  manufacturers  of  current 
chess  machines ,  he  decided  to  evaluate 
one  very  thoroughly.  He  obtained  the 
use  of  a  “ representative ”  machine  for 
several  weeks  and ,  during  that  time , 
subjected  it  to  an  intense  scrutiny. 
Some  of  his  results ,  including  some 
sharp  criticisms  plus  a  few  compli¬ 
ments,  appear  in  the  following  article. 
Other  games  of  his  “ tournament ”  will 
appear  in  future  PC  issues.) 


Because  the  $100.00  barrier  has  been 
broken  (Chess  Challenger  7  lists  at 
$99.95,  JS&A’s  game  is  under 
$100.00  and  Boris  Diplomat  is  not 
much  more),  anyone  unwilling  to 
spend  $200.00  plus  for  a  “toy”  that 
plays  weak  chess  may  want  to  take 
another  look.  I  did,  and  had  the  luck  to 
borrow  a  CC  7  for  a  10  game  “match” 
in  a  two- week  period.  We  contested  4 
of  the  games  at  Level  3  (Average  Re¬ 
sponse  Time  1  minute  20  seconds),  4 
games  at  Level  7  (ART  3  minutes),  and 
2  games  at  Level  6  (ART  6  minutes). 
The  result  was  predictable.  Welsh:  10  - 
CC  7:0,  though  CC  did  get  the  better 
game  on  two  occasions. 

CC  7  is  at  its  best  at  Level  3.  Games 
at  Levels  6  and  7  tend  to  become  all-day 
affairs,  and  the  increase  in  CC’s  play¬ 
ing  strength  is  by  no  means  proportion¬ 
al  to  the  extra  time  used.  The  package 
could  be  improved  (the  board  for  ex¬ 
ample,  atop  CC  is  really  too  small).  If 
CC  must  supply  a  coded  board,  why  not 
a  separate  folding  one? 

How  strong  is  CC  7?  Not  very.  It  is 
probably  misleading  to  suggest  a  nu¬ 
merical  rating,  but  most  players  above 
1200  can  usually  defeat  it.  CC  will  give 
beginners  and  casual  players  who  don’t 
know  “book”  a  battle.  However,  it  is  a 


Diagram  1 


good  opponent  for  a  youngster  learning 
the  game.  More  advanced  players  will 
soon  discover  its  weak  points,  and  then 
tend  to  “play  the  opponent”  rather  than 
the  board.  Instead  of  presenting  a  gene¬ 
ral  description  of  CC’s  playing  pecu¬ 
liarities,  I  offer  them  as  I  encountered 
them  —  in  the  games. 

GAME  1  -  LEVEL  3 

This  was  not  much  of  a  contest,  and 
doesn’t  show  CC  to  advantage. 
BLACK:  CC7  Ruy  Lopez  1  e4  e5  2 
Nf3  Nc6  3  Bb5  a6  4  Ba4  Nf6  5  o-o  b5  6 
Bb3  Nxe4?!  So  far  CC  has  played  a 
reasonable  line,  but  this  is  dangerous.  7 
Bd5  ...  By  this  simple  move,  White 
gets  a  clear  advantage.  7  .  .  .  f5?  a 
dangerous  weakening  of  CC’s  position. 
8  Bxc6  dxc6  9  d3  Nf6  10  Nxe5  (See 
Diagram  1).  .  . 

At  this  point  CC  is  busted. 

10  .  .  .  Qd5?  Tactically  unsound;  CC 
has  nothing  better  than  10  .  .  .  Bb7.  1 1 
Nc3!  Qxe5  12  Rel  Ne4  13  dxe4  Now 
White  has  the  piece  back  and  Black  is 
unable  to  develop. 

13  .  .  .  Be6  14  exf5  Qxf5  15  Qe2 

15  .  .  .  Kd7?  Correct  was  .  .  .  Kf7. 

16  Bf4!  b4?  17  Rdl+  Ke7  18  Bg5  + 
Ke8? 

Again  .  .  .  Kf7  was  much  better. 

19  Ne4  h6  20  Bh4  Kf7  CC  was  wise  to 
avoid  20.  .  .  g5?  21  Qh5+  Qf7  (21  .  .  . 
Ke7?  22  Nxg5!;  21  .  .  .  Bf7??  22  Nf6 
mate)  22  Nf6+  Ke7  23  Rd7+  Kxf6  24 
Rxf7+  Bxf7  25  Qf3+  and  wins. 

21  Bg3  Ra7  22  b3  Be7  23  Rd3  .  .  . 

23  .  .  .  Rb7??  I  still  can’t  understand 


how  CC  could  have  overlooked  this!  .  . 

.  The  remaining  moves  were:  24  Rf3  g6 
25  Rxf5 4-  Bxf5  26  Qc4+  Kg7?  27 
Be5  +  Kf8  28  Bxh8  Bd7  29  Nc5  Bc8? 
30  Ne6+  Bxe6  31  Qxe6  Rb5  32 
Qxe7  +  1  -  0 

GAME  2  -  LEVEL  3 

This  game  was  more  interesting; 
although  CC  again  got  in  trouble  in  the 
opening,  its  decisive  error  was  not  quite 
so  obvious,  and  the  game  continued  to 
an  ending. 

WHITE:  CC  7  4  Knights’  Game  1  e4 
e5  2  Nf3  Nc6  3  Bc4  Nf6  4  Nc3  Bc5  CC 
didn’t  know  the  2  Knight’s  Defence 
and  transposed  into  the  Italian  variation 
of  the  4  Knights’  Game.  Here  4  .  .  . 
Nxe4  is  better  for  Black,  but  I  wanted  to 
see  what  CC  would  do  in  a  quiet  open¬ 
ing.  5  d3  d6  6  Be3  Bb6  7  d4  .  .  . 

This  is  premature. 

7  .  .  .  exd4  8  Bxd4  .  .  .  Normal  (for 
humans)  would  be  8  Nxd4. 

8  .  .  .  Bg4!  Suddenly  White  is  under 
inconvenient  pressure. 

9  Qd3?  .  .  .  Overlooking  a  combina¬ 
tion;  necessary  was  9  Bxb6  axb6  fol¬ 
lowed  by  10Be2. 

9  .  .  .  Bxf3  10  Bxf6  Qxf6  1 1  Qxf3 
11  .  .  .  Qxf3  12  gxf3  Nd4 
CC  now  loses  a  Pawn. 

13  0-0-0  Nxf3  14  Rdfl?!  .  .  . 

The  f-pawn  wasn’t  reallyen  prise.  14. . 

.  Ne5  15  Bb5+  c6  16  Be2  0-0-0  17 
Rhgl  g6  18  h4  Bd4  19  Rg3  Nd7  20  Bc4 
Rhf8  21  f4Nc5 

CC’s  “plan”  is  quite  harmless  —  mine 
isn’t.  Now  it  blunders.  (Diagram  2) 


Diagram  2 


22  Rdl?  .  .  .  Obviously  CC  is  only 
analyzing  to  a  depth  of  3  half-moves. 
This  loses  another  Pawn  and  the  game. 
22  .  .  .Bxc3  23  Rxc3  Nxe4  24  Rb3  d5 
25  Be2  Rfe8  26  Rb4?!  Kc7!  27  Bg4  .  .  . 
CC  sees  the  threat  of  Nc3 ! 

27  ...  f5  28  Bf3  Nf6  29  Ra4  Re3  This 
invasion  is  decisive. 

30  Bg2  a6  31  Rad4  Rde8  32  a4  Re2  33 
BO?  .  .  .  Much  better  was  33  R4d2. 

33  .  .  .  Rh2  34  Rb4  Rxh4  35  Rd3  a5  36 
Rbd4  Ne4  Now  it’s  all  over. 

37  b4  .  .  .  CC  will  pursue  a  “plan”  to 
the  death,  even  a  bad  one. 

37  .  .  .  Rxf4  38  bxa5  Ra8  39  Rb4  Rxa5 

40  Rdb3  b5!  The  price  of  the  Pawn  is 
exchanges. 

4 1  axb5  cxb5  42  Bxe4  dxe4  43  Rxb5  43 
.  .  .  Rxb5  44  Rxb5  h5 

Now  Black  has  an  easy  win. 

45  Kd2  RO  46  Rc5  +  Kd6  47  Rc4  h4  48 
Kdl  h3  49  Rd4+  Kc5  50  Rd2  Rg3  51 
Kc  1  ?  Rg2  52  c3  Rxd2  53  Kxd2  h2  54  c4 
hl(Q)  55  Kc3  Qdl  56  Kb2  Kb4  57  c5 
Qd2  +  58  Kal  Kb3 
0-1 

GAME  3  -  LEVEL  3 

CC  rebounds  with  its  best  effort  of  the 
match,  aided  by  careless  play  on  my 
part.  It  held  the  balance  up  to  move  53 
before  suddenly  collapsing. 

WHITE:  CC  7  Queen’s  Pawn  Open¬ 
ing  1  d4  Nf6  2  Nc3  d5  3  Bf4  Bf5  4e3  e6 
5  Be2  .  .  .  CC  plays  very  conservatively 
in  the  opening;  more  aggressive  is  5 
Bd3  c6  6  Ne2  Nd7  7  Ng3  Bxd3. 

5  .  .  .  c5  6  NO  Nc6  7  o-o  Be7  8  a4  . . .  A 
reasonable  move  in  this  position. 

8  .  .  .  o-o  9  Ne5  Nb4  Time  to  get  some 
action  going;  this  game  is  becoming 
terribly  boring. 

10  Bd3?!  .  .  .  Obviously  better  is  10 
Rcl. 

10  .  .  .  Nxd3  1 1  cxd3?  .  .  .  Apparently 
CC  thinks  its  Knight  is  too  well  posted 
to  move! 

11...  cxd4  12  exd4  Qb6  13  Nb5?! .  .  . 
Loss  of  a  Pawn  cannot  be  avoided. 

13  .  .  *  a6  14  Nc3  Qxd4  15  Qf3  Bb4  At 
this  point  CC’s  all-too-human  oppo¬ 
nent  began  to  play  in  very  perfunctory 
fashion  —  in  extenuation  of  which  it 
may  be  observed  that  CC’s  play  so  far 
has  been  less  than  inspiring. 

16  Rfbl  Rac8?  Correct  was  16  .  .  . 
Bxc3. 

17  Ne2  Qb6  18  Be3  Bc5  19  a5  Qb4 
20  Qf4  Qxf4  2 1  Bxf4Ba7 
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Now  it  looks  as  if  White  must  play  Rcl 
with  a  fine  ending  for  Black. 

22  Ra4!!  ...  A  really  excellent  move, 
which  I  completely  failed  to  appreciate 
even  after  it  was  played. 

22  .  .  .  Rc2?  23  Nd4  Bxd4  Clearly 
forced.  Now  I  began  to  realize  the  prob¬ 
lems  that  suddenly  face  Black. 

24  Rxd4  Rc5  25  b4  Rb5  26  Rcl  b6 

27  axb6  Rxb6  28  Rc7  ...  CC’s  high- 
water  mark  for  the  match. 

Here  CC  has  the  advantage,  the  Pawn 
minus  notwithstanding.  But  Black’s 
resources  are  sufficient  to  hold. 

28  .  .  .  h6  Necessary  preparation  for  a 
counters  troke. 

29  h4!  .  .  .  Another  well-timed  Pawn 
push. 

29.  .  .Rfb8!  By  this  time,  of  course,  my 
interest  in  the  game  has  become  intense 
—  there’s  a  good  deal  more  to  this 
move  than  meets  the  eye. 

30  Bd2!  .  .  .  Did CS  see  30  Rxf7? Rxb4 

31  Rxb4  Rxb4  32  Bg3  Rbl+  33  Kh2 
Ng5  -I-  etc.  —  if  not,  why  didn’t  it  want 
to  trade  the  weak  b-Pawn  for  my 
f-Pawn? 

30  .  .  .  R6b7  31  Rc6  Ra8  Now  Black  is 
out  of  danger  and  can  work  on  freeing 
his  position. 

32  f3  Ne8  33  Ng4  .  .  .  The  motive  for 
this  is  unclear;  I  was  glad  to  avoid  op¬ 
posite-colored  Bishops,  by  .  .  .  33  .  .  . 
Bxg4 

34  fxg4?  .  .  .  Really  strange.  Of  course 
34  Rxg4  was  much  better,  but  perhaps 
CC  thought  its  Rook  ideally  posted  at 
d4! 

34  .  .  .  Nc7  35  Rf4  e5  36  Rf3  Ne6  37 
Rd6  d4  38  Kf2  Nf8  39  h5  f6 
Now  Black  gets  his  King  into  the  game. 
40  Ke2  Kf7  41  Rc6  Ke7  42  Rf2  Kd7  43 
Rc  1  Ne6  44  Rf5  Nc7  45  g3  Nd5  46  Rc4 
Rab8 

At  this  point  it  seems  that  the  Pawn 
must  fall. 

47  Rf  1 !  .  .  .  Now  if  Black  takes  the 
b-Pawn,  CC  wins  the  a-Pawn  in  return. 

47  .  .  .  Nxb4?!  .  .  .  Here  I  thought  my 
a-Pawn  was  the  weaker  of  the  two; 
correct  enough;  but  47  .  .  .  Nc3  +  ! 
trading  the  d-Pawn  for  White’s  b-Pawn 
was  much  better.  Now  the  ending  ought 
to  be  very  hard  to  win. 

48  Ral  Kd6  49  Bxb4+  Rxd4  50 
Rxa6+  R4b6  51  Rc8  .  .  .  Tricky,  but 
this  just  exchanges  a  pair  of  Rooks. 

51  .  .  .  Rxc8  52  Rxb6+  Rc6  53 
Rxc6+?  CC  commits  suicide  in  the 


ending.  After  53  Rb8,  Black  would  be 
faced  with  extreme  technical  problems 
in  attempting  to  win  the  ending,  due  to 
the  vulnerability  of  the  g-Pawn. 

53  .  .  .  Kxc6  54  Kel??  ...  The  last 
hope,  faint  though  it  is,  is  54  Kf2  with 
hopes  for  54  .  .  Kd5  55  Kf3  Ke6? 

56  Ke4  Kd6  57  Kf5;  which  I  would 
have  short-circuited  by  55  .  .  .  e4+ ! 

54  .  .  .  Kd5  55  Kdl ? e4 56 dxe4+  Kxe4 
CC  was  now  playing  very  rapidly, 
about  10  seconds  a  move. 

57  Kel?  Ke3  58  Kfl?  d3  59  g5  d2  60 
gxf6  dl(Q)+  61  Kg2  Qe2+  62  Kh3 
Kf3  63  fxg7  Qg2+ 

0-1 

An  1800  Level  Chess  Game 

Based  in  part  on  my  experience  with 
CC  7,  I’ve  formulated  some  ideas  on 
what  will  be  required  for  an  electronic 
chess  game  to  play  at  approximately 
1800  level: 

1)  Look-ahead  capability  —  4  moves 
@  4  minute  response  time  (approxi¬ 
mately  international  tournament  time 
rate).  This  requires  (in  an  open  posi¬ 
tion)  an  evaluation  rate  of  about  30,000 
positions/sec.  —  about  1000  times  CC 
7’s  capacity.  Given  the  present  rate  of 
progress  in  electronics,  this  may  be  the 
easiest  requirement. 

2)  Positional  evaluation  —  A  sophisti¬ 
cated  positional  evaluation  program  is  a 
must.  Even  today’s  big-machine  pro¬ 
grams  are  relatively  weak  in  strategic 
insight;  they  play  better  in  open,  tacti¬ 
cal  positions.  Briefly,  a  good  positional 
evaluation  program  must  correctly  ap¬ 
preciate  strong  and  weak  squares;  must 
value  the  control  or  occupation  of  each 
square  according  to  the  position  at  the 
moment  as  well  as  probable  future  posi¬ 
tions,  instead  of  using  fixed  values  all 
through  the  game;  must  be  able  to  ap¬ 
preciate  the  potential  activity  of  mod¬ 
em  closed  positions  (a  particularly  dif¬ 
ficult  task);  and  must  be  able  to  foresee 
and  initiate  strategic  piece  maneuvers, 
for  example  the  well-known  Nd2-fl- 
e3-f5  maneuver  in  the  Ruy  Lopez.  All 
this  will  be  very  difficult  in  practice. 

3)  Endgames  —  A  reasonable  level  of 
endgame  proficiency  should  not  be  too 
difficult  to  attain,  exact  analysis  being 
much  easier  in  simplified  positions.  A 
different  program,  however,  is  re¬ 
quired  for  the  endgame  —  and  it  must 
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be  possible  to  switch  to  this  program  in 
middle-game  analysis  when  endgame 
positions  must  be  evaluated,  a  difficult 
thing  to  do  in  practice. 

4)  Openings  —  Big-machine  program 
experience  indicates  that  a  “book”  of 
several  thousand  variations  is  required 
for  competitive  survival.  This  is  largely 
due  to  the  difficulty  of  writing  a  good 
openings  program.  Even  if  this  were 
not  impractical,  an  electronic  game 
would  surely  be  more  interesting  and 
valuable  to  serious  players  if  it  fol¬ 
lowed  the  best  theoretical  lines,  rather 


than  making  second-best  though  rea¬ 
sonable  moves.  Obviously  some  kind 
of  mass  memory  is  essential,  and  it  is 
not  easy  to  visualize  how  enough  mem¬ 
ory  for  a  large  openings  book  could  be 
supplied.  Here  the  game  manufacturer 
should  profit  from  the  example  of  cal¬ 
culator  manufacturers,  by  supplying 
the  openings  library  in  the  form  of 
replaceable  modules  —  one  general- 
purpose  module  free  with  the  machine, 
and  optional  specialized  modules  (e.g. 
an  entire  module  just  for  the  Ruy 
Lopez)  sold  separately  to  serious 


General  Ideas.... 


Words  from  Russia 

Some  of  the  articles  on  computer  chess 
which  appear  here  are  occasional  re¬ 
prints  from  the  Russian,  pocket-sized 
digest  called  SPUTNIK.  The  magazine 
is  a  colorful  presentation  of  life  and 
activities  (including  chess  news)  in 
Russia  and  contains  a  choice  number  of 
articles  (30  to  40)  extracted  from  all  the 
publications  in  the  Soviet  Press.  An¬ 
nual  subscriptions  to  this  English 
language  version  of  what  they  call  a 
“monthly  digest  of  the  best  current 
Soviet  writing”can  be  obtained  for 
$7.50.  A  list  of  subscription  agencies  in 
the  USA  and  in  14  other  foreign  coun¬ 
tries  can  be  obtained  by  writing  to 
SPUTNIK  DIGEST;  Novosti  Press 
Agency;  2  Pushkin  Square;  103006, 
Moscow,  USSR. 

Beyond  comprehension? 

“In  the  September  issue  of  PC,”  writes 
John  Hesse,  of  6583  Hollandaire  Dr. 
W.,  Boca  Raton,  FL,  33433,  “a 
Russian  writer  indicates  the  complexity 
of  solving  the  game  of  chess  by  com¬ 
puter.  To  reproduce  the  first  ten  moves 
alone  would  ‘require  the  world  popula¬ 
tion  and  217  billion  years,’  he  says. 
And  he  states  that  all  possible  combina¬ 
tions  on  the  board  approach  10120. 
Can  this  number  of  moves  ever  be  dup¬ 
licated  by  a  computer? 

“The  answer  is  no,  it  cannot.  The 
reason  derives  from  fundamental  phys¬ 
ical  limits  which  may  be  interesting  to 
some  of  your  readers.  The  limits  were 
worked  out  by  the  mathematician  Hans 


J.  Bremermann  writing  on  ‘Complexity 
and  Transcomputability’  in  THE 
ENCYCLOPEDIA  OF  IGNORANCE, 
edited  by  Duncan  and  Weston-Smith 
and  published  by  Simon  and  Schuster, 
NY,  1977.  These  limits  are  set  by: 

1 .  The  age  and  size  of  the  universe. 

2.  The  speed  of  light. 

3.  Quantum  mechanics. 

“The  first  item  determines  the  max¬ 
imum  size  and  time  limit  of  our  ulti¬ 
mate  computer:  the  entire  known  uni¬ 
verse  is  used  in  the  construction  of  the 
chess-playing  system.  The  other  two 
items,  as  determined  by  Bremermann, 
establish  a  maximum  internal  signal 
flow  rate.  The  speed  of  light  is  the 
maximum  speed  at  which  information 
can  flow  from  point  to  point.  Quantum 
mechanics  tells  us  the  minimum 
amount  of  energy  required  to  reliably 
represent  one  bit  of  data. 

“The  maximum  rate  is  c2/h  where  c 
is  the  speed  of  light  and  h  is  Planck’s 
constant.  This  computes  to  1.35 
X  1047  bits  per  second  per  gram,  and 
assumes  the  entire  mass  of  the  system  is 
in  the  form  of  data  energy  (in  the  form 
of  photons,  for  example).  This  is 
clearly  an  impossibility  because  it  is 
difficult  to  imagine  a  system  that  has 
some  kind  of  long-term  structure  but 
also  has  a  zero  rest  mass!  Even  a  hydro¬ 
gen  bomb  or  an  exploding  super-nova 
has  energy  flows  per  unit  of  mass  many 
orders  of  magnitude  less  than  the  above 
figure.  Note  that  current  computer  sys¬ 
tems  achieve  about  105  bits  per  second 
per  gram.  Nevertheless,  this  is  the  limit 
for  information  processing. 


players.  It  would  also  be  wise  to  make 
the  modules  re-programmable. 

If  all  this  can  be  done  for  less  than 
$300.00  in  today’s  money,  not  only 
will  the  game  manufacturer  have  a 
highly  successful  product  with  ongoing 
revenue  from  module  sales,  but  Chess 
in  the  U.S.  will  benefit  greatly  from 
mass  exposure  to  the  game  at  a  rela¬ 
tively  high  standard  of  play. 


Other  games  of  Welsh's  10- game 
“ tournament  ”  will  appear  in  following 
issues. 


“The  estimated  age  of  the  universe  is 
20  billion  years  or  6.3  x  1017  sec¬ 
onds.  Its  mass  is  about  1055  grams.  The 
mass-time  product  then  is  6.3  x  1072 
gram  seconds.  Therefore,  the  maxi¬ 
mum  number  of  states  this  computer 
could  achieve  is  6.3  x  1072  x  1.35  x 
1047  or  8.5  x  10119  —  slightly  less 
than  the  10120  possible  chess  board 
combinations  mentioned  initially  (less 
by  about  3  billion  years!). 

“If  the  Big  Bang  that  created  the 
cycle  of  the  universe  that  we  live  in  had 
generated,  instead,  a  large,  fast,  chess¬ 
playing  computer,  it  would  still  be 
playing  today. 

“In  this  example,  the  entire  universe 
is  one  big  CPU  with  no  mass  set  aside 
for  memory.  Interesting  games  and 
other  results  cannot  be  preserved. 
Perhaps  more  interesting  than  the  sheer 
unsolvability  of  the  chess  problem  is 
the  giant  gap  that  exists  between  cur¬ 
rent  DP  technology  and  the  physical 
limit:  about  42  orders  of  magnitude!” 

We’re  waiting 

The  following  letter  from  A1  Gallia, 
15615  Profit  Ave.,  Baton  Rouge,  LA 
70816,  reveals  the  current  dilemma 
among  “computer-oriented”  chess 
players.  “I  am  interested  in  purchasing 
a  micro  chess  unit,”  writes  Al,  “but  I 
don’t  have  enough  information  on 
which  to  make  a  selection.  Being  a 
1 500-rated  player  I  would  prefer  a  unit 
that  could  play  above  my  level.  At 
least,  it  should  be  able  to  play  a  rela¬ 
tively  even  game  to  my  playing  level. 
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otherwise  I  wouldn’t  consider  it  worth 
buying.  I  am  willing  to  spend  up  to 
$300  or  so.  I  eagerly  look  for  all  in¬ 
formation  on  the  current  commerical 
stand-alone  units.  I  am  especially  in¬ 
terested  in  relative  speed  and  program 
complexity.  So,  where  are  these 
machines?” 

It  is  apparent  from  Al’s  letter,  which 
is  similar  to  many  others  we  receive, 
that  there  is  a  waiting  market  for  chess 
devices  which  will  play  at  higher  levels 
than  current  estimations.  Watching  the 
development  of  both  chess  programs 
and  the  availability  of  new  bubble- 
memory  hardware,  one  must  arrive  at 
the  conclusion  that  manufacturers  of 
devices  like  Chess  Challenger,  Boris, 
and  others  cannot  be  too  far  away  from 
the  magic  level  of  1500.  Once  such  a 
rating  has  been  clearly  established  for 
micro  chess  programs  (casettes  and 
disks  which  run  on  a  microcomputer 
already  are  at  that  plateau)  we  feel  that 
the  market  will  open  up. 

Hail  to  the  champ! 

That  is  the  huzzah  being  heard  from 
Hayden  Book  Company  these  days,  in 
the  following  press  release: 

“Here’s  the  program,  the  best  of  the 
micros,  that  came  in  third  against  the 
big  machines  (mainframes  and  maxis) 
at  the  9th  North  American  Computer 
Chess  Championship!  Published  by 
Hayden  Book  Company,  Inc.  it  is  en¬ 


titled  S  ARGON  II  by  Dan  and  Kathe 
Spracklen.  ‘Buy  this  program  when  it 
becomes  available  .  . .  unequaled  in  the 
end  game’ . .  . Personal  Computing, 
July,  1979.  S ARGON  II  is  able  to  push 
passed  pawns  toward  queening,  play  a 
strong  end  game,  and  range  in  deep 
play  levels  at  end  game  without  user 
direction.  The  computer  displays  the 
levels  of  play  at  which  it  is  thinking, 
and  also  shows  the  move  it  is  currently 
thinking  of  making.  And  by  a  flashing 
asterisk,  it  shows  that  the  computer  is 
thinking  and  has  not  accidentally  hung 
up.  The  computer  will  keep  changing 
the  move  shown  until  its  final  choice  is 
made.  SARGON II  has  7  levels  of  play, 
and  levels  0-3  play  in  tournament  time. 
It  has  a  randomized  opening  book  for 
all  7  levels  of  play  through  3  moves. 
When  setting  up  the  board,  the  user  can 
scan  up  and  down,  left  and  right.  And 
finally,  for  those  players  who  may  need 
help,  a  special  hint  mode  is  included  at 
all  levels  of  play  but  0.  When  you  con¬ 
sider  the  features  and  play  capabilities 
of  SARGON  II,  it’s  easy  to  see  why  it’s 
the  Champ  of  Champs!”  (We  have 
heard  mutterings  from  the  Chess  Chal¬ 
lenger  people  saying:  “Well,  we’ll  just 
have  to  see  about  that!  Champ  of 
Champs!  Indeed!”) 

Flash  points 

As  the  Jan.  PC  was  about  to  go  to  press 
(Oct.  31)  word  was  received  that 


CHESS  4.7  had  won  the  10th  ACM 
Computer  Chess  Tournament  in  De¬ 
troit.  S  ARGON/BORIS  finished  in 
seventh  place.  MYCHESS  finished  in 
fifth  place ...  A  cable  message  re¬ 
ceived  at  the  same  time  said  that  the 
Boris/Sargon  unit  had  won  the  first  four 
rounds  in  David  Levy’s  European 
Tournament  in  London,  ahead  of  both 
MYCHESS  and  CHESS  CHALLEN¬ 
GER  . . .  More  complete  details  will  ap¬ 
pear  next  month  . . .  The  U.S.  Chess 
Federation  is  co-sponsoring  the 
Russian  Gambit  Trip  this  year.  The  tour 
takes  Americans  to  famous  Russian 
chess  centers,  including  computer- 
chess  labs,  and  meets  with  world- 
renowned  chess  leaders.  Cost  of  the 
all-expense-paid  trip  (with  meals)  has 
been  reduced  to  $1495.  For  further  in¬ 
formation,  contact  Malcom  Byrne, 
Citizen  Exchange,  145  Hanover  St., 
Boston,  Mass.  ...  An  energetic  chess 
addict,  Vam  Fields,  of  Philadelphia, 
has  been  an  active  postal  chess  partici¬ 
pant  for  many  years.  He  is  now  launch¬ 
ing  a  postal  chess  tournament  for  com¬ 
puters.  He  thinks  such  a  tournament 
may  last  about  a  year  and  he  will  be 
reporting  regularly  on  the  progress  in 
the  contest.  Anyone  with  a  computer 
program  (their  own  or  commercial),  or 
with  a  stand-alone  device,  who  would 
like  to  participate  in  this  tournament, 
should  respond  to  Vam’ s  ad  in  the  clas¬ 
sified  section. 


A  Mauling  at  the  Mall 


The  above  play  on  words  is  an  accurate 
description,  according  to  John  Urwin, 
of  what  happened  one  day  last  October 
when  a  small  microcomputer  chess- 
program  (MYCHESS,  on  a  CRO- 
MEMCO)  challenged  a  mainframe- 
program  (XENARBOR-4,  on  a  Con¬ 
trol  Data)  to  a  game  of  chess.  All  the 
dominated,  struggling,  hard-working 
little  people  of  the  world  will  be  glad  to 
know  that  the  small  skinny  program 
beat  the  big  muscle-bound  bully!  And 
hooray,  for  our  side!  John  Urwin  de¬ 
scribes  the  significant  event: 

“The  demonstration,  hosted  by  The 
Santa  Clara  Chess  Club,  was  called  The 
Third  Annual  Challenge  The  Masters 


and  was  held  at  the  Vallco  Shopping 
Center  in  Cupertino,  CA  on  Oct.  6th, 
1979.  It  was  staged  in  the  open  spaces 
of  the  mall  with  boards  set  up  in  usual 
long-table  fashion  for  human  play  and 
the  computers  set  up  nearby,  side  by 
side. 

“Three  well-known  chess  masters 
participated.  They  were  International 
Grand  Master  Peter  Biyiasas;  National 
Master  George  Kane;  and  Life  Master 
Dennis  Fritzinger.  The  three  played 
simultaneously  against  15  opponents 
each.  The  computers,  meanwhile, 
which  were  set  up  for  blitz  chess  dem¬ 
onstration  against  humans,  included  a 
modem  connection  to  a  CDC  (for 


Xenarbor-4);  a  CROMEMCO  (for 
Mychess)  and  an  ATARI  machine  (for 
the  Atari  chess  cartridge.) 

“The  masters  had  a  full  day  and 
played  continuously  from  11:00  A.M. 
to  5:00  P.M.  without  any  time  out  for  a 
break.  Really,  a  Trojan  performance! 
But  the  spectators  (and  the  estimate  was 
that  by  the  end  of  the  day,  several  thou¬ 
sand  had  milled  around  the  demonstra¬ 
tion)  were  more  fascinated  by  the  com¬ 
puters  than  by  the  chess  masters.  The 
average  spectator  watched  the  humans 
play  chess  for  only  about  10  or  15  min¬ 
utes  after  which  they  became  bored 
with  the  relative  inactivity  there  and 
came  over  to  the  machines.  The  young 
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chess  addicts,  of  course,  followed  the 
grandmasters  worshipfully,  jotting 
down  all  the  moves  and  making  occa¬ 
sional  outcries  of  approval.  But  the  real 
interest  was  at  the  machines.  Anyone 
who  doubts  that  ‘machine  chess’  has 
already  spawned  a  deep  interest  among 
the  country’s  chess  players  should  have 
been  at  the  Vallco  Shopping  Center. 
The  majority  of  the  spectators  spent 
most  of  their  time  here.  They  examined 
the  units;  touched  the  keyboards  as 
though  they  were  fingering  the  textures 
of  fine  cloth  and  they  asked  many  ques¬ 
tions.  How  did  the  machines  work? 
How  were  moves  selected?  How  strong 
were  their  chess  playing  abilities?  How 
much  did  they  cost?  Would  they  break 
down  after  so  many  games?  All  of  the 
questions  were  answered  and  most  of 
the  spectators  became  instant  potential 
buyers  of  the  commercial  devices. 
When  they  would  actually  break  down 
and  buy  a  unit,  they  would  not  say.  But 
from  this  shopping  mall  experience,  I 
would  guess  that  the  market  for  chess 
devices  is  growing  stronger  all  the  time 
and  it  is  only  a  question  of  time  before 
chess  players  break  open  their  penny 
banks  to  buy  one  of  the  machines. 

“An  interesting  moment  of  the  ma¬ 
chine  demonstration  arose  when 
MYCHESS,  the  little  guy,  challenged 
giant  XEN ARBOR  4  to  a  ‘fight’.  Some 


(Diagram  A) 


(Diagram  B) 


words  were  exchanged  before  the 
match  began.  The  operator  for  the  CDC 
computer  sneered  at  such  a  match,  say¬ 
ing  it  was  rather  ridiculous  and  that  the 
giant  computer  would  have  no  trouble 


trouncing  the  little  upstart.  But  plucky 
MYCHESS  persisted  in  its  challenge 
and  finally,  XENARBOR  said  okay. 
So,  it  was  agreed  to  play  one  game. 

“We  began  our  game  with 
XENARBOR  4  playing  white  and 
MYCHESS  playing  black  at  a  4-ply 
level.  The  first  scheduled  game  ended 
with  a  draw  by  repetition  much  to 
XENARBOR’s  dismay.  The  second 
game  was  a  different  story.  At  a  point 
where  underdog  MYCHESS  was  ahead 
by  three  minor  pieces  and  was  well  on 
its  way  toward  winning  the  game, 
XENARBOR  entered  a  wrong  move!  It 
was  decided  not  to  waste  time  by  reset¬ 
ting  the  positions  even  though 
XENARBOR  was  in  trouble,  but  to  play 
a  third  game. 

“On  this  final  game,  MYCHESS  ap¬ 
peared  to  be  doing  poorly  with  four 
pawns  already  down!  But  on  move  41 , 
my  program  showed  its  bullhorns  and 
found  a  forced  mate!  It  was  truly  an 
historical  event  with  the  puny  micro¬ 
computer  pretty  well  dominating  the 
big  mainframe.  I  am  toying  with  the 
idea  of  now  calling  my  program 
‘MYCHESS  THE  GIANT  KILLER’. 

“Meanwhile  the  Atari  chess  machine 
was  tied  up  most  of  the  day  by  an  ex¬ 
pert-rated  player,  (Sanchez,  2160)  who 
was  so  fascinated  by  computer  chess 
that  he  could  not  pull  himself  away.  He 


Notes  to  game  Mychess  vs  Xenarbor:  by  Morris  Miller: 


(a)  Book,  but  I  prefer  6-N-KB3,  B-N5;  7-B-QB4, 0-0  [not 
7- . .  .NxP;  8-BxPch,  K-B;  9-0-0!,  NxN;  10-PxN, 
BxP;  1 1-B-R3ch,  KxB;  12-Q-Q5ch,  K-Kl;  13-KR- 
K1 !  with  a  mating  attack;  or  12- . .  .K-B3  or  N3;  13- 
QR-N 1  followed  by  R-N3  and  the  rook  goes  over  to  the 
king  side]  8-0-0!,  BxN;  9-PxB,  NxP;  10-R-K1, 
NxQBP;  11-Q-Q3,  N-R5;  12-B-R3,  R-Kl;  13-B-Q6. 
White  will  get  back  one  of  his  two  pawns  and  have  the 
two  bishops  and  a  crushing  advantage.  The  point  of  the 
above  variations,  which  are  of  course  far  beyond  the 
lookahead  of  the  programs,  is  that  the  input  of  mere 
opening  moves  is  not  enough.  The  principles  behind 
the  moves  have  to  be  instilled  or  disaster  follows. 

(b)  Best  is  9-R-QN1.  Mychess  is  afraid  of  the  pin  and 
indeed  seems  to  value  knights  over  bishops,  as  evident 
by  its  previous  move,  a  concept  that  is  bad  and  should 
be  eliminated.  Black  now  has  the  move  R-N5,  winning 
a  pawn  at  K4  or  N7. 

(c)  Starting  a  wholly  unwarranted  king  side  series  of 
moves.  K-Rl  is  best. 

(d)  Now  the  knight  is  marooned. 


White  starts  throwing  away  pawns  needlessly,  which 
black  seems  strangely  reluctant  to  take. 

Instead  P-KB4  followed  by  P-Q4  smashes  through  the 
center. 

Now  instead  of  the  text,  which  succeeds  in  stalemating 
the  queen,  there  is  a  mating  finish:  27-.  .  .P-Q4ch!; 
28-BxP,  PxBch;  29-Kxany  pawn  and  the  rooks  come 
on  the  open  files  with  a  quick  mate.  Or  27- .  .  .P-Q4ch; 
28-K-Q3,  P-K5  mate.  It  is  perfectly  all  right  to  sacri¬ 
fice  pawns  to  mate ! 

(h)  At  last  a  threat!  Can  anyone  believe  white  will  win? 
But  in  the  last  half  of  the  game  black  plays  listlessly 
and  white  vigorously. 

(i)  Missing  a  chance  for  a  different  win:  35-R-KN 1  and  if 
B-N3  as  in  the  text;  36-RxPch,  KxR;  37-Q-Q7ch, 
K-N3;  38-Q-B5ch,  K-N2;  39-R-KR1,  R-KR1;  40-Q- 
Q7ch,  K-Bl;41-RxR  mate. 

(j)  R-KR1  forces  mate  quicker. 

David  beat  Goliath;  big  is  not  enough  against  a  better 
program. 


(e) 

(0 

(g) 
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later  commented  that  ATARI  made  very 
reasonable  moves  in  its  chess  games.  I 
find  it  rather  significant  that  such  a 
good  player  would  play  that  long  with  a 
computer  program.  My  own  observa¬ 


tion  is  that  as  chess  programs  get 
stronger,  chess  interest  among  the 
‘purists’  is  going  to  balloon. 
Someday,  I  think,  all  chess  players  will 
be  walking  around  the  street  with  small 


battery-operated  chess  devices  in  then- 
pockets  and  kids  will  be  playing  com¬ 
puter  chess  on  every  street  comer,  in 
public  transportation  or  at  disco  parties, 
during  rest  periods  by  the  orchestra.  ” 


WHITE:  MYCHESS  (on 

11.  0-0 

Q-N3 

25.  P-R3 

BxP 

Cromemco) 

BLACK:  XENARBOR  4  (on 
Control  Data  Computer) 

12.  P-KB3  (c) 

P-Q3 

26.  Q-KB1 

BxPch 

13.  K-B2 

14.  P-B3  (d) 

B-K3 

Q-R4 

27.  KxB  (g) 

28.  K-K3 

Q-QB7ch 

QxN 

1 .  P-K4 

P-QB4 

15.  P-QN4  (e) 

Q-R5ch 

29.  Q-N2  (h) 

P-N4 

2.  N-KB3 

N-QB3 

16.  K-K2 

QxRP 

30.  B-N3 

QxRP 

3.  P-Q4 

PxP 

17.  K-B2 

B-R5ch 

31.  Q-K4 

K-Rl 

4.  NxP 

N-B3 

18.  K-K3 

Q-B5ch 

32.  QxBP 

R(N1)-B1 

5.  QN-B3 

P-K4 

19.  K-K2 

Q-R7 

33.  QxP 

P-B3 

6.  NxN  (a) 

NPxN 

20.  B-R6 

QxPch 

34.  K-K4 

B-B7 

7.  QB-N5 

R-QN1! 

21.  K-Q3 

35.  R(KN)-Q1  (i)B-N3 

8.  BxN? 

QxB 

36.  Q-K7 

P-QR4 

9.  N-R4  (b) 

(See  Diagram  B) 

37.  B-B7  (j) 

RxB 

21.  ... 

B-Bl  (f) 

38.  QxB 

P-B4ch 

(See  Diagram  A) 

22.  B-B4 

B-R6 

39.  KxBP 

B-K6 

9.  ... 

B-K2 

23.  R-KN1 

Q-KB7 

40.  R-Q7 

QxP 

10.  B-Q3 

0-0 

24.  R-QN1 

B-N7 

41.  QxP  mate 

Origins  of  Computer  Chess 


Sometime  ago,  Dr.  I.  J.  Good,  of 
Virginia  Polytechnic  Institute  and  State 
University,  sent  us  a  note  describing  an 
unusual  game  of  garden  chess  involv¬ 
ing  mental  arithmetic  which  was  once 
conducted  by  Dr.  Champemowne  of 
England  against  his  famous  colleague. 
Dr.  A.  M.  Turing.  Also  mentioned  in 
the  note  was  a  reference  to  an  early 
chess  machine  that  the  two  were  dis¬ 
cussing.  For  more  information  on  this 
early  experimentation  in  chess  and 
chess  activities  we  contacted  Dr.  David 
Champemowne  (Professor  Emeritus, 
Trinity  College)  and  received  the  fol¬ 
lowing  response: 

“It  is  not  really  correct  to  describe  as 
‘Garden  Chess’  the  games  which  Alan 
Turing  and  I  played  in  the  garden  of  my 
mother’s  house  some  time  near  the  end 
of  the  second  world  war.  They  were 
played  at  a  time  when  Turing,  who  was 
acquainted  with  Bannister,  was  taking 
up  long  distance  running  and  having 
considerable  success  with  it.  He  was 
interested  in  the  disastrous  effects 
which  running  had  on  one’s  mental 
capacity  to  make  rational  decisions 
concerning  the  tactics  of  the  race.  Our 


games  were  simple  experiments  to  test 
the  effects  of  running  on  clear  thinking. 
The  two  players  had  to  chase  one 
another  round  a  short  course  and  per¬ 
form  a  simple  mental  task  at  a  certain 
point  on  the  circuit;  in  one  version  of 
the  game  the  task  was  to  double  a  num¬ 
ber  (which  of  course  got  horribly  large 
after  several  circuits).  In  another  ver¬ 
sion  the  task  was  to  play  a  move  in  a 
chess  game.  One  tactic  of  that  chess 
experiment  was  to  run  very  fast  and  get 
two  moves  running,  but  the  after-ef¬ 
fects  might  prove  disastrous  to  one’s 
play.  These  experiments  provided 
more  entertainment  than  useful  know¬ 
ledge.  The  game  did  not  combine  chess 
and  mental  arithmetic.  One  game  in¬ 
volved  chess  and  the  other  involved 
mental  arithmetic. 

“It  was  in  the  late  summer  of  1948 
that  Turing  and  I  did  try  out  a  loose 
system  of  rules  for  deciding  on  the  next 
move  in  a  chess  game  which  we 
thought  could  be  fairly  easily  pro¬ 
grammed  for  a  computer.  My  long-suf¬ 
fering  wife,  a  beginner  at  chess,  took 
on  the  system  and  lost.  Neither  Turing 
nor  I  took  this  experiment  at  all  serious¬ 


ly  and  I  certainly  kept  no  record  of  the 
system  and  I  doubt  whether  he  did 
either.  Here  is  what  I  think  I  remember 
about  the  system  but  I  may  have  been 
influenced  by  what  I  have  since  read 
about  others  people’s  systems. 

“There  was  a  system  for  estimating 
the  effects  of  any  move  on  White’s  es¬ 
timated  net  advantage  over  Black.  This 
allowed  for: 

(1)  Captures,  using  the  convention¬ 
al  scale  of  10  for  pawn,  30  for 
knight  or  bishop,  50  for  rook, 
100  for  queen  and  something 
huge,  say  5000,  forking. 

(2)  Change  in  mobility;  i.e.,  change 
in  the  number  of  squares  to 
which  any  piece  or  pawn  could 
immediately  move  legitimately 
(1  each) 

(3)  Special  incentives  for  (a)  Cast¬ 
ling  (3  points),  (b)  Advancing  a 
passed  pawn  (1  or  2  points),  (c) 
Getting  a  rook  onto  the  seventh 
rank  (4  points  perhaps). 

(4)  I  don’t  think  occupation  of  one 
of  the  4  central  squares  gained 
any  special  bonus.  We  did  not 
cater  to  the  end-game. 


“Most  of  our  attention  went  to  de¬ 
ciding  which  moves  were  to  be  fol¬ 
lowed  up.  My  memory  about  this  is 
infuriatingly  weak.  Captures  had  to  be 
followed  up  at  least  to  the  point  where 
no  further  capture  was  immediately 
possible.  Checks  and  forcing  moves 
had  to  be  followed  further.  We  were 
particularly  keen  on  the  idea  that 
whereas  certain  moves  would  be 
scorned  as  pointless  and  pursued  no 
further  others  would  be  followed  quite 
a  long  way  down  certain  paths.  In  the 
actual  experiment  I  suspect  we  were  a 
bit  slapdash  about  all  this  and  must 
have  made  a  number  of  slips  since  the 
arithmetic  was  extremely  tedious  with 
pencil  and  paper.  Our  general  conclu¬ 
sion  was  that  a  computer  should  be  fair¬ 
ly  easy  to  program  to  play  a  game  of 
chess  against  a  beginner  and  stand  a  fair 
chance  of  winning  or  at  least  reaching  a 
winning  position. 

“Both  Turing  and  I  were  weak 
players  but  he  was  the  weaker.  We  also 
tried  out  a  poker-playing  system  based 
on  zero-sum  two-person  game  theory. 
Whereas  I  had  contributed  quite  a  lot  to 
the  design  of  the  chess  system  I  made 
no  contribution  to  the  poker-system  ex¬ 
cept  to  act  as  guinea-pig  in  which  capa¬ 
city  I  gained  enormous  satisfaction  in 
defeating  the  system  by  good  luck. 

“Oddly  enough  your  note  reached 
me  just  when  Shawn  Wylie  (who  was 
mentioned  in  the  Turing  letter  sent 
along),  now  a  near  neighbour,  and  I  had 
clubbed  together  with  3  others  to  invest 
in  a  ‘Boris  Diplomat’.  We  are  recently 
retired  and  can  afford  time  to  experi¬ 
ment  with  this  toy.” 

A  brief  background  on  Dr.  Cham- 
pemowne  (not  updated): 

D.G.  CHAMPERNOWNE  was 
Reader  in  Economics  at  the  Univer¬ 
sity  of  Cambridge  and  College  Lec¬ 
turer  and  Fellow  (Economics)  in 
Trinity  College,  Cambridge.  Edu¬ 
cated  at  Winchester  College  and  at 
Kings  College,  Cambridge,  he  was 
assistant  lecturer  at  the  London 
School  of  Economics  from  1936  to 
1938  and  University  Lecturer  in 
Statistics  in  Cambridge  University 
from  1938  to  1939.  From  1939  to 
1941,  he  served  as  a  member  of  the 
Prime  Minister’s  Statistical  Section, 
and  from  1941  to  1945  he  was  assis¬ 
tant  director  of  programs:  M.  A.P. 


COMPUTER  CHESS 


In  1945  Mr.  Champemowne  was 
named  Director  of  the  Oxford  Insti¬ 
tute  of  Statistics  and  All  Souls 
Reader  in  Statistics.  From  1949  to 
1959,  he  was  Professor  of  Statistics 
in  the  University  of  Oxford.  His 
other  honors  include  Prize  Fellow  of 
Kings  College,  Cambridge  (1937- 
1948)  and  Fellow  of  Nuffield  Col¬ 
lege,  Oxford  (1945-1959). 

Currently  retired,  Dr.  Champer- 
nowne  holds  the  title  of  Professor 
Emeritus,  Trinity  College,  England. 
He  lives  at  25  Worts  Causeway; 
Cambridge  CB1  4RJ,  England. 

Dr.  Good  also  has  an  impressive 
background.  His  most  interesting  post 
(to  readers  of  spy  thrillers)  was  his 
work  during  World  War  II  at  Bletchley 
on  “Ultra”.  (Dr.  Champemowne 
worked  on  the  same  project.)  This  pro¬ 
ject  was  the  subject  of  a  best  selling 
book  (The  Ultra  Secret)  several  years 
ago  which  described  the  intense  re¬ 
search  done  by  the  “best  brains  of  the 
Allies”  in  developing  a  wartime  code- 
breaking  machine. 

Further  achievements  marking  Dr. 
Good’s  distinguished  career  include: 
Lecturer,  Researcher  and  Consultant 
on  such  subjects  as  mathematics,  elec¬ 
tronic  computing,  information  re¬ 
trieval,  evaluation  of  the  Perceptron, 
statistical  computation,  probability 
determinations  and  other  subjects  too 
numerous  to  list  here.  Dr.  Good,  who 
once  played  chess  at  the  championship 
level  in  England,  holds  numerous  de¬ 
grees  and  honors  including  a  B.A., 
M.A.  and  Ph.D.  from  Cambridge  plus 
Doctor  of  Science  degrees  from  both 
Cambridge  and  Oxford.  In  1942  he  was 
among  seven  people  in  England  who 
helped  design  a  large-scale  (classified) 
binary  electronic  digital  computer.  “I 
believed,”  he  comments,  “that  this 
was  the  first  such  unit  in  the  world  until 
I  learned  in  1974  that  Atasonoff  had 
told  Mauchly  how  to  build  a  computer 
in  1938.  The  two  principal  designers  of 
our  computer  were  M.H.A.  Newman 
and  T.H.  Flowers.  Flowers  headed  the 
engineering  group  among  whom  I 
believe  the  most  influential  were  S.  W. 
Broadhurst,  W.W.  Chandler  and 
A.W.M.  Coombs.  The  main  users 
were  Newman,  Michie  and  myself.” 
Currently  Dr.  Good  serves  as  “Univer¬ 
sity  Distinguished  Professor  of  Statis¬ 


tics”  at  Virginia  Polytechnic  Institute 
and  State  University,  Blacksburg,  VA. 

Animated  Chess 

Chess  has  not  always  been  a  slow, 
hushed,  static  activity  confined  to  a 
table  top  while  players  rested  their 
thoughtful,  serious  faces  in  upturned 
hands.  One  well-known  variation  of 
chess  which  was  full  of  music  and 
movement  and  gaity  was  called 
“Living  Chess”.  A  delightful  descrip¬ 
tion  of  “Living  Chess”  appears  in  the 
Encyclopedia  of  Chess,  edited  by  Anne 
Sunnucks,  published  and  copyrighted 
in  1970  by  St.  Martin’s  Press  and  is 
attributed,  in  the  encyclopedia,  to  E. 
Pritchard.  The  encyclopedic  item, 
which  follows,  is  reprinted  with  per¬ 
mission  of  the  publisher,  St.  Martin’s 
Press,  Inc.,  175  Fifth  Avenue,  New 
York,  NY  10010: 

Living  Chess 

During  the  past  600  years  the  game 
played  with  living  pieces  has  from  time 
to  time  been  presented  in  different 
countries.  The  spectacle  has  tended  to 
follow  a  fairly  standard  pattern.  Con¬ 
tests  take  place  usually  in  the  open  air. 
The  chessmen,  quite  often  children  of 
appropriate  size,  are  attractively  cos¬ 
tumed  in  contrasting  colours.  They  are 
naturally  taught  enough  chess  to  inter¬ 
pret  the  orders  of  the  two  players  cor¬ 
rectly.  The  players  are  seated  on  some¬ 
thing  like  tennis  umpire’s  ladders,  from 
which  they  can  view  the  large  board 
and  call  out  their  moves,  through  a 
megaphone  if  necessary.  In  order  to 
keep  interest  and  to  avoid  tiring  the 
participants,  games  are  usually  light¬ 
ning  ones,  with  each  player  allowed  10 
minutes,  as  recorded  by  his  own  time¬ 
keeper.  An  umpire  ensures  that  the 
correct  moves  are  made.  There  are 
sometimes  additional  conventions, 
such  as  the  King  lifting  his  sceptre 
when  in  check. 

The  fifteenth  century  seems  to  pro¬ 
vide  the  earliest  records  of  the  living 
game.  The  Sultan  Mohammed  is  said  to 
have  played  it  in  Grenada  in  1408.  The 
most  famous  of  all  living  games  is  the 
one  still  played  regularly  in  Marostica, 
Italy.  In  1454  two  suitors  played  for  the 
hand  of  the  beautiful  Lionara.  They 
played  out  their  contest  on  the  piazza 
for  all  to  see,  and  it  is  this  same  game 
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which  has  been  faithfully  reenacted 
through  the  years.  The  pieces,  magni¬ 
ficently  attired  according  to  tradition 
are  well  rehearsed.  The  board  is  enor¬ 
mous,  giving  scope  to  mounted 
Knights  and  Rooks  manned  by  two 
soldiers  apiece.  A  herald  announces  the 
moves  to  the  audience. 

Later,  in  the  sixteenth  century,  Don 
John  of  Austria  is  said  to  have  had  a 
chamber  in  which  was  a  chequered 
pavement  of  black  and  white  marble. 
Upon  this  living  men  moved  under  his 
direction.  About  the  same  time  we  find 
Rabelais  describing  in  Pantagruel 
(1564)  an  elaborate  living  game,  into 
which  music  and  dancing  are  intro¬ 
duced.  The  32  young  persons  are  clad 
in  silver  and  gold  and  play  and  dance  on 
squares  of  white  and  yellow. 

In  more  recent  years  in  England  dis¬ 


plays  have  largely  been  organised  by 
the  Kent  County  Chess  Association, 
Including  those  at  the  Margate  Con¬ 
gresses  of  1935  and  1936,  when 
Capablanca  was  one  of  the  players  and 
the  boys  of  Chatham  House  School 
acted  as  the  pieces.  One  of  the  smallest 
lads  fainted  at  one  of  the  displays,  an 
occupational  hazard  of  the  unmoved 
Rook’s  Pawn.  Most  spectacular  was 
the  Hurlingham  display  of  1936,  when 
games  were  played  between  Oxford 
and  Cambridge,  the  House  of  Lords 
and  the  House  of  Commons,  the  Army 
and  the  Navy,  the  British  Girl  Cham¬ 
pion  and  the  British  Boy  Champion. 
The  pieces  marched  on  and  off  to  musi¬ 
cal  accompaniment.  The  Kent  Associa¬ 
tion  also  assisted  in  the  Croydon  dis¬ 
play  of  1939,  when  Lord  Dunsany  and 
Vera  Menchik  were  among  the  players. 


Other  displays  coincided  with  great 
events,  such  as  the  corporation  in  1937. 
The  Southern  Counties’  Chess  Union 
organized  a  display  for  the  Festival  of 
Britain.  Onlookers  numbered  5,000. 
The  boys  of  East  Moor  School,  Leeds 
acted  as  the  pieces  and  wore  costumes 
of  red  and  gold  made  by  themselves. 
Players  included  Rossolino,  Broad- 
bent,  Dr.  C.  E.  M.  Joad  and  Godfrey 
Nicholson  M.P. 

Further  afield,  one  of  the  best  con¬ 
tested  and  most  spectagenic  games  of 
all  time  must  have  been  the  one  at  the 
Moscow  Sport  Palace  in  March  1962. 
This  was  between  the  reigning  World 
Champion,  Botvinnik  and  ex- World 
Champion,  Smyslov.  The  pieces  were 
ballet  dancers.  The  result  was  a  draw. 

E.  PRITCHARD 


Classifieds 


Rates  for  advertising  in  this  section: 
$1  per  word .  Minimum:  15  words. 
Allow  two  months  for  appearance 
(usual  publication  lag).  Announce¬ 
ment  of  human  tournaments  that  are 
open  to  computers  published  without 
charge.  Send  all  submissions  for  this 
section  to  COMPUTER  CHESS 
CLASSIFIED  DEPARTMENT. 


JOIN: 

ICCA  (International  Computer 
Chess  Association.)  $5  annual 
membership  fee  includes  the  ICCA 
NEWSLETTER  with  computer- 
chess  news  from  all  over  the  world. 
Send  U.S.  check  or  international 
money  order  to  ICCA,  Vogelback 
Computer  Center,  Northwestern 
University,  Evanston,  IL  60201. 

COMPUTER  POSTAL  CHESS: 

Join  the  First  Annual  North  Ameri¬ 
can  “Open  Computer  Postal  Chess 
Tournament.”  All  computers  are 
welcome  to  enter.  Your  program 
will  play  other  programs  in  two 
consecutive  games,  Round  Robin 
tournament  style.  You  can  partici¬ 
pate  from  your  own  living  room. 
Trophies  to  winners.  Send  your 
name  and  address  for  further  de¬ 
tails  to  Varn  Fields,  PO  Box  8202, 
Philadelphia,  PA  19101.  Tel.  (215) 
387-7143. 


BORIS.2.5  SARGON 
INSTITUTIONAL  COMPUTER  DE¬ 
VELOPMENT  CORP.  is  a  mail  order 
company  unlike  any  other;  we  have 
an  ear,  voice,  and  conscience.  Our 
business  is  microcomputers  manu¬ 
factured  by  Boris  and  Fidelity: 
BORIS  2.5  MODULAR,  AUTO-RE- 
SPONSE  BOARD,  DIPLOMAT, 
CHESS  CHALLENGER  “7”,  “10”, 
VOICE,  BRIDGE,  BACKGAMMON, 
CHECKERS  “2”  and  “4”.  For  a 
quote  on  lowest  prices  call  (516) 
872-3333  or  (516)  872-3532  from 
8:00  AM  to  4:30  PM  Eastern  Time. 
For  product  information  and  ques¬ 
tions  call  (516)  623-6826  from  8:00 
PM-10:00  PM  Eastern  Time.  Pur¬ 
chase  price  will  be  reduced  by 
$2.00  to  cover  cost  of  call.  Or  write 
I.C.D.  CORP.,  PO  Box  474,  Merrick, 
NY  11 566. 

“MICRO  GO  9L” 

The  ancient  rival  of  chess,  GO,  is 
now  available  for  the  first  time  on  a 
cassette  for  the  8K  PET.  Pro¬ 
grammed  to  play  on  a  9  x  9 
“board,”  the  cassette  costs  $18.95. 
Write  to  “aidcom”;  Box  165, 
Clarkson  Postal  Station;  Missis¬ 
sauga,  Ontario  L5J  3Y1  (Tel. 
416-823-3237) 

GOMOKU  FOR  TRS-80 
Play  Gomoku  against  the  com¬ 
puter.  Program  plays  on  a  9  x  9  grid 
with  excellent  graphics  and  goof- 
proof  I/O.  Gomoku  16K  Level  II 
cassette,  and  instructions  $15.  Dis¬ 
covery  Bay  Software  Co.,  Dept.  P, 
PO  Box  464,  Port  Townsend,  WA 
9B368. 


BACKGAMMON  CASSETTE: 

The  GAMMON  CHALLENGER  gives 
all  backgammon  players  a  battle. 
Has  3  levels  of  play.  Switches 
sides,  tests  problems  and  stores 
positions  in  memory.  Available  on 
TRS-80  cassette  for  either  Level  1 
or  Level  2.  $14.95  each.  Computer 
Cablevision,  2617  42nd  Street,  NW, 
Washington,  DC  20007. 

NEW!  SARGON  2.5  MODULE! 
Chafitz  modular  game  system  fea¬ 
turing  the  world’s  strongest  play¬ 
ing  microcomputer  chess  program! 
(Plays  above  1500  level  in  tourna¬ 
ment  time.)  Write  or  phone,  24 
hours  a  day  for  free  discount  price 
list,  brochure,  and  an  in-depth 
technical  report.  Palmer,  McBride 
and  Kinkaid  Associates,  PO  Box 
598,  East  Brunswick,  NJ  08816.  Tel. 
(201)  246-7680. 

MICROCHESS  “COMPARISONS:” 
Microcomputer  chess  being  played 
against  rated  players  and  other 
programs  for  comparison  pur¬ 
poses.  Interested  in  getting  your 
program  or  device  into  these  un¬ 
biased  tests?  Contact  John  Urwin, 
1537  Argyle  Court,  San  Jose,  CA 
95132. 

CLASSIFIED  CORRECTION 
The  ad  for  GIGA,  a  Backgammon 
program  for  North  Star  BASIC, 
which  appeared  in  the  November 
issue,  had  the  wrong  address.  For 
further  information  on  this  $15  disk, 
write  to  “GIGA”;  P.O.  Box  1881; 
Chicago,  IL  60690. 


COMPUTER  GAMES 

OF  OTHER  SORTS 


(“ Intelligent ”  Computer  games  welcomed  by  this  department.  Address  all  corre¬ 
spondence  to  COMPUTER  GAMES  DEPARTMENT ,  Personal  Computing.) 

Early  GO  Programs 
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Position  in  a  game  of 
GO  used  by  Zobrist 
to  demonstrate  his 
theory  of  influence 
numbers. 
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The  earliest  computer  program  to  play  a 
complete  game  of  GO  was  written  by 
A1  Zobrist  of  Pasadena,  CA. ,  as  a  thesis 
for  his  PhD  in  1968.  Bruce  Wilcox, 
co-author  with  Walter  Reitman  of  the 
U.  of  Michigan’s  Reitman- Wilcox  GO 
program,  described  Zobrist’ s  initial  ef¬ 
forts  and  also  discussed  GO  programs 
in  general  in  a  recent  “Computer  Go” 
article.  The  material,  copyright  1978 
by  Bruce  Wilcox,  appeared  in  the  offi¬ 
cial  Journal  of  the  American  Go  Asso¬ 
ciation,  PO  Box  397,  O  Chelsea  Sta¬ 
tion,  NY,  NY  10011.  (Wilcox’s  com¬ 
plete  discussion,  only  part  of  which  is 
reprinted  here,  deals  with  the  problems 
involved  in  programming  GO  as  op¬ 
posed  to  chess.) 

Only  5  years  ago  the  world’s  fore¬ 
most  Go  organization,  the  Nihon  Kiin, 
published  this  statement: 

“If  it  is  possible  for  the  tremendous 
power  of  the  computer  to  conquer  the 
game  of  Go,  everybody  will  lose  in¬ 
terest  in  it.  Such  apprehension,  how¬ 
ever,  is  completely  groundless .... 
Fortunately,  Go  is  such  a  profound  and 
extensive  game  that  it  can  never  be  con¬ 
trolled  by  machinery ....  Those  who 
are  concerned  in  the  computer  business 
know  it  is  only  a  fantastic  dream  to 
make  the  computer  play  Go  in  its  own 
way  in  place  of  human  beings.  ” 

In  1977,  an  introductory  Go  book 
stated  that:  “the  game  is  said  to  be 
beyond  the  capacity  of  computers.  ” 

Well,  I  have  been  patient  too  long.  I 
will  assume  these  statements  were 
made  out  of  ignorance  —  but  I’ve  had 
enough  of  them!  I  am  a  skilled  pro¬ 
grammer  and  player;  and  I  have  no 
doubt  that  computers  will  play  amateur 
shodan  Go  within  my  lifetime.  (That 
gives  me  lots  of  time  to  program  it 
myself.  Twenty  years  is  a  more  reason¬ 
able  guess.)  Nor  should  there  be  any 
concern  over  people  losing  interest  if 
computers  can  play  well.  Until  a  com¬ 
puter  is  programmed  with  gamesman¬ 
ship  and  showmanship  —  until  a  pro¬ 
gram  recovers  a  losing  game  by  delib¬ 
erate  swindle  —  there  will  always  be  a 


demand  for  Bobby  Fischers.  Far  from 
hurting  the  game,  computer  programs 
seem  to  add  new  interest. 

The  sheer  size  of  the  Go  board  has  a 
heavy  impact  on  programming.  Even  at 
the  end  of  a  game  of  Go,  there  may  be 
over  a  hundred  legal  moves  remaining. 
Exhaustive  searching  in  Go  reaches 
computer  time  and  space  limits  before 
going  anywhere  near  the  depth  reached 
by  chess  programs.  This  is  critical  be¬ 
cause  to  play  good  Go  you  must  look 
DEEPER  than  in  chess.  Chess  masters 
only  occasionally  examine  lines  of  play 
going  15-20  moves  deep.  Go  masters 
do  this  routinely,  and  often  go  much 
deeper.  This  does  not  mean  Go  masters 
are  smarter  than  chess  masters.  Be¬ 
cause  of  the  smaller  scale  of  chess  (in 
pieces,  game  length,  and  space)  and  the 
mobile  nature  of  the  game,  significant 
changes  occur  rapidly.  The  whole 
board  can  undergo  upheaval  in  a  few 
turns.  Go,  on  the  other  hand,  is  played 
by  successive  addition  of  a  single  stone 
to  a  large  board  with  the  previous 
stones  remaining  untouched  (except  by 
capture).  Thus  the  game  exhibits  fewer 
changes  per  move  and  longer  se¬ 
quences  accomplishing  even  simple 


local  tasks.  The  pace  of  Go  is  much 
slower  and  tactical  interactions  are 
often  largely  devoid  of  global  impact. 

Humans  look  15  or  more  moves  deep 
in  chess  because  of  a  single-minded 
purpose  which  computer  programs 
lack.  The  intent  of  computer  lookahead 
is  to  find  a  move  leading  to  an  overall 
“better  chess  position”,  taking  into  ac¬ 
count  whatever  factors  it  can.  Looking 
at  all  sequences  up  to  a  depth  of  6  or  7 
moves  finds  many  of  the  normal  mate¬ 
rial  and  positional  gains  that  a  human 
would  find.  (Of  course  the  occasional 
misses  of  a  9  move  sequence  can  prove 
fatal.)  Such  random  searching  finds  in¬ 
teresting  boards  at  a  reasonable  cost  for 
chess,  but  cannot  be  transferred  to  Go. 
Because  it  takes  many  moves  to  bring 
about  significant  changes  in  a  Go  posi¬ 
tion,  finding  interesting  results  “by 
accident”  is  prohibitively  expensive. 
Searches  must  be  restricted  to  deter¬ 
mining  if  and  how  a  specific  task  can  be 
accomplished.  This  is  how  humans 
control  their  searching  in  both  chess 
and  Go,  enabling  great  depth  to  be 
achieved  with  few  extraneous  moves. 

Chess  and  Go  are  both  simplified 
example  of  “inexact  problems”,  ones 
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that  have  no  clear  solution  algorithm. 
Humans  can  be  quite  skilled  at  these 
problems,  even  if  it  is  not  clear  how 
they  do  it.  In  programming  any  game, 
the  temptation  is  to  let  the  computer  do 
its  thing  —  grind  out  an  answer  by 
looking  at  as  many  moves  as  can  be 
afforded.  Doing  this,  chess  program¬ 
mers  have  achieved  human-like  per¬ 
formance  without  human-like  thought 
processes. 

Chess  has  long  been  a  favorite  do¬ 
main  for  research  in  the  field  of  Artifi¬ 
cial  Intelligence  (AI),  but  Go  may  yet 
supercede  it.  As  Berliner  has  noted: 

“Human  chess  players  largely  de¬ 
lude  themselves  in  believing  that  chess 
is  a  ‘conceptual’  game  ....  while  chess 
may  have  to  be  ‘conceptual’  to  a  human 
processor,  such  an  approach  may  not  be 
at  all  necessary  for  super-fast  ma¬ 
chines.  However,  even  if  a  full-width 
search  program  were  to  become  World 
Chess  Champion,  such  an  approach 
cannot  possibly  work  for  Go,  and  this 
game  may  have  to  replace  chess  as  the 
‘task  par  excellence’  for  AI.  (For  those 
desiring  more  on  computer  chess,  I 
recommend  Prof.  Hans  Berliner’s  re¬ 
view  of  chess  program  history  and  lit¬ 
erature  in  ARTIFICIAL  INTELLI¬ 
GENCE,  vol  10,  1978.) 

Go  is  a  whole  new  challenge  requir¬ 
ing  insights  into  human  thought  and 
new  programming  techniques.  Because 
global  changes  occur  slowly  in  Go,  the 
game  is  much  better  suited  to  studying 
complex  information  management  and 
decision-making  than  is  chess.  Aside 
from  its  serious  merits,  programming 
Go  is  fun.  And  since  the  field  is  still  in 
its  infancy,  there  are  many  opportun¬ 
ities  to  explore  the  unknown. 

Having  shown  why  programming  is 
so  hard,  let  us  see  just  what  has  been 
accomplished. 

November  17,  1968  —  The  earliest 
program  to  play  a  complete  game  of  Go 
was  written  by  Albert  Zobrist  for  his 
PhD.  (his  thesis  was  entitled  Feature 
Extraction  and  Representation  for  pat¬ 
tern  Recognition  and  the  Game  of  Go ). 
There  was  no  clear  way  to  distinguish 
the  human  from  the  computer  then. 
Both  could  be  human.  That  game, 
between  two  complete  novices,  was  not 
Go  as  we  are  used  to  it.  It  was,  how¬ 
ever,  a  landmark.  The  program  (play¬ 
ing  white)  was  able  to  play  a  complete 


game  of  Go  (to  move  232),  and  win  by 
7  points. 

July  11, 1970  —  The  crucial  test  of  a 
program’s  understanding  of  the  game  is 
seen  in  its  play  against  a  skilled  player. 
This  is  the  last  version  of  Zobrist’ s  pro¬ 
gram,  playing  Black  with  13  stones 
against  an  estimated  7  kyu.  Black’s 
moves  seemed  almost  human.  (I  say 
almost  because,  while  they  reflected 
human  pattern  knowledge,  they  did  not 
reflect  human  understanding  of  the 
game.)  The  program  did  not  “under¬ 
stand”  why  it  played  a  move,  so  its 
moves  failed  to  support  each  other. 

Zobrist’ s  program  provided  basic 
analysis  of  the  board  in  terms  of: 

1)  Segmentation  of  the  board  into 
Black  and  White  regions.  This  was 
done  using  an  “influence  function”. 
The  idea  is  that  stones  control  empty 
points  near  them.  Black  stones  radiate 
positive  influence;  White  stones  radiate 
negative  influence.  Opposing  influenc¬ 
es  cancel  out,  and  whoever  has  more 
influence  is  left  in  “control”  of  that 
point.  A  segment  consists  of  areas  of 
contiguous  points  of  the  same  sign  (also 
called  a  group  or  army).  The  absolute 
value  of  the  influence  number  at  a  point 
measured  the  degree  of  control  over 
that  point  by  a  player’s  stones.  A  sepa¬ 
rate  count  was  kept  for  the  number  of 
stones  and  the  number  of  empty  points 
contained  in  a  segment. 

An  “influence  function”  is  a  com¬ 
mon  building  block  of  most  programs. 


It  is  often  used  to  define  groups  and  to 
handle  potential  territory  and  influence 
(walls,  thickness,  etc.).  Mathemati¬ 
cians  and  programmers  have  had  this 
fascination  with  influence  functions, 
and  I  understand  that  Manfred  Wimmer 
(former  European  champion  and  a  pro¬ 
fessional  Go  player)  worked  on  one 
around  1970. 

Zobrist’ s  influence  function  is  worth 
a  closer  look.  Consider  a  19x  19  matrix 
representing  points  of  a  Go  board.  Each 
Black  stone  was  give  +50,  each  White 
stone  —50,  and  all  other  locations  were 
given  0.  Then  each  positive  location 
added  1  to  each  of  its  4  neighbors.  The 
1  point  add/subtract  process  was  re¬ 
peated  3  more  times.  In  effect  this 
spreads  influence  of  stones  out  to  near¬ 
by  areas,  and  the  results  are  quite  in¬ 
teresting.  The  accompanying  dia¬ 
grams,  from  Zobrist’s  thesis,  shows 
a  board  position,  its  segmentation, 
and  influence  numbers  generated 
(negative  numbers  are  underlined). 

2)  Occupation  of  points  and  neigh¬ 
bors.  Information  was  maintained  as  to 
whether  a  point  was  occupied,  by 
whom,  and  how  many  of  its  neighbors 
were  of  each  color  (both  adjacent  and 
diagonal). 

3)  Stones  and  dame.  (Dame  = 
vacant  intersection  adjacent  to  a  stone.) 
For  each  occupied  point  the  program 
kept  the  number  of  stones  in  its  chain 
and  the  number  of  dame  in  the  chain. 
Each  vacant  point  had  associated  with  it 
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the  number  of  empty  adjacent  inter¬ 
sections. 

With  that  board  information,  here  is 
how  the  program  worked.  There  was  a 
set  of  “patterns”  to  be  applied  to  the 
entire  board  in  all  areas  and  orienta¬ 
tions.  These  patterns  were  lists  of  tests 
for  the  existence  of  certain  values  in  the 
various  basic  board  data  at  specified 
locations.  One  such  pattern  might  be 
the  equivalent  of:  Black  stone  at  (0,0) 
with  1  dame,  empty  space  at  (1,0),  and 
Black  stone  at  ( 1 , 1 )  with  at  least  4  dame 
=  the  play  at  ( 1 ,0)  is  worth  500  points. 
This  would  detect  chains  in  atari 
(equivalent  to  check  in  chess)  which 
could  be  saved  by  connecting  them  to 
another  chain.  The  program  looks  at 
each  intersection  of  the  board,  one  by 
one.  If  a  Black  stone  with  1  dame  is 
found  (the  0,0  relative  coordinate 
base),  then  the  program  looks  for  a 
neighboring  empty  point  (location  1 ,0) 
and  corresponding  safe  Black  string 
(location  1,1).  When  instances  of  this 
pattern  are  found,  a  500  point  bonus  is 
added  to  the  proposed  move  location, 
the  connection  at  (1,0).  This  is  an  ex¬ 
ample  of  specialized  knowledge  that 
would  not  be  matched  very  often.  Con¬ 
sider  the  pattern:  White  segment  at 
(0,0),  Black  segment  at  (1,0)  =  the 
play  at  (0,0)  is  worth  40  points.  It  is  a 
general  one  that  might  match  100  times 
in  a  single  pass  over  the  entire  board 
and  gives  the  program  an  “urge”  to 
advance  toward  the  enemy. 

Many  patterns  were  applied  to  the 
board,  with  the  scores  being  summed 
for  each  location.  Whichever  ended  up 
with  the  highest  score  became  the  pro¬ 
gram’s  next  move.  (Notice  this  is  like 
“whole-board”  evaluation  after  a 
search  of  all  moves  to  a  depth  of  one.) 
Some  patterns  were  used  only  in  certain 
“phases”  of  the  game,  to  deal  with 
differences,  say,  between  fuseki  and 
endgame.  Other  patterns  were  used  to 
downgrade  moves.  Ko  (an  infinite  re¬ 
capture  situation)  was  a  recognized 
pattern  and  a  bonus  of  -4000  was  given 
an  illegal  ko  recapture.  This  effectively 
removed  the  move  from  consideration. 

Patterns  alone  didn’t  play  a  reason¬ 
able  game  of  Go  (not  surprising),  so 
lookahead  was  added.  The  program 
used  some  of  its  patterns  to  mark  points 
where  lookahead  should  be  performed. 
The  lookahead  was  extremely  weak, 


and  was  used  for  connectivity  and  stone 
safety.  Brute  force  was  the  key — look 
at  all  combinations  of  moves  within  the 
range  of  marked  points;  but  only  to  a 
depth  of  3  moves.  There  was  a  separate 
routine  to  handle  ladder  searches, 
which  went  to  an  indefinite  depth  (the 
only  allowed  moves  were  atari  and 
save).  Moves  which  accomplished  the 
lookahead  goal  had  bonuses  added  to 
them,  just  as  though  they  had  matched  a 
pattern  (in  a  sense  they  had).  To  handle 
life  and  death  situations  (tsume-go), 
rather  than  use  normal  lookahead,  a 
special  mechanism  attempted  to  deter¬ 
mine  sets  of  points  needed  to  form  two 
eyes  if  unopposed.  Moves  entering  into 
the  greatest  number  of  eye  formations 
were  given  bonuses  if  there  were 
neither  too  few  nor  too  many  eyes 
formable. 

Clearly  his  program  was  a  weak  Go 
player.  But  if  you  added  a  good  look¬ 
ahead  system  and  more  patterns,  how 
far  could  it  develop?  I  don’t  know.  In 
some  sense  you  can  characterize  all  Go 
play  as  pattern  and  lookahead  con¬ 
trolled.  But  his  program  design  had 
several  important  omissions.  Humans 
use  patterns  that  make  sense  only  with 
the  results  of  earlier  computation  (pat¬ 
terns  of  patterns  of  .  .  .  ).  “Push  your 
opponent’s  weak  stones  toward  your 
strong  ones”  is  a  pattern  statement 
which  first  requires  using  lookahead 
and  patterns  to  recognize  weak  and 
strong  stones. 

For  the  program’s  moves  to  look  rea¬ 
sonable  so  frequently,  clearly  there 
must  be  something  to  the  notion  that 
humans  use  patterns  to  guide  their  play. 
But  while  the  patterns  had  motivations 
implicit  in  them,  no  testing  was  done  by 
the  program  to  see  if  the  implied  motive 
was  reasonable  in  the  current  situation. 
Nor  was  there  any  continuity  of  pur¬ 
pose  from  turn  to  turn.  Humans  filter 


Professor  David  W.  Erbach,  of  the 
mathematics  department.  University  of 
Wisconsin  at  Madison,  describes  him¬ 
self  as  “neither  the  best  computer  ex¬ 
pert  nor  the  best  GO  player  in  the  coun¬ 
try.  But  I  am  probably  as  familiar  as 
anyone  on  both.”  He  offered  an  in¬ 
teresting  and  authoritative  look  at  GO 


out  many  otherwise  reasonable  pattern 
moves  because  one  pattern  is  more 
valuable  for  a  specific  on-going  goal. 
One  thing  all  progams  that  I  know  of 
have  in  common  is  an  inability  to  play 
out  a  ko  fight.  They  recognize  that  it  is 
illegal  to  recapture  immediately,  but 
since  ko  is  a  motivational  concept,  they 
know  nothing  about  generating  ko 
threats.  Instead  the  program  merely 
selects  its  next  best  move.  (Many  ko 
threats  are  stupid  moves  in  and  of  them¬ 
selves.) 

While  Zobrist’s  program  left  much 
undone,  remember  that  his  was  the 
first.  It  is  thus  an  important  milestone  in 
computer  Go.  And  it  beat  human  be¬ 
ginners,  setting  the  stage  for  improved 
programs. 

(Part  II  of  the  Zobrist  GO  program 
will  show  one  of  the  games  played  by 
this  program  together  with  analysis  by 
Bruce  Wilcox.  Also  included  will  be 
some  personal  observations  received 
from  A1  Zobrist  in  some  recent  corre¬ 
spondence.) 

A  recent  note  from  Bruce  Wilcox 
said  he  was  leaving  University  of 
Michigan’s  GO  project.  (The  program 
will  be  continuing  at  the  University.) 
His  future  plans  indicate  that  he  will 
become  involved  in  some  interesting 
developments  in  the  growing  field  of 
Computer  Go.  “Depending  on  where  I 
end  up”  he  writes,  “I  will  either  be 
doing  a  conversion  of  our  program  for  a 
big  machine,  (aiming  to  make  it  more 
transportable  to  any  machine,)  or  I  will 
be  intensively  exploring  microcomput¬ 
ers  and  will  pursue  the  possibilities  of 
producing  a  micro  GO-program.” 
Whichever  path  Bruce  follows,  he  is 
sure  to  provide  some  valuable  and  long- 
awaited  contributions  to  computerized- 
GO.  His  new  address  is  now 
“Inometrics”,  700  Concord  Ave., 
Cambridge,  MA. 


in  a  recent  letter.  Extracts  from  that 
letter  follow: 

“The  game  and  its  history:  As  you 
may  know,  the  origins  of  the  game  are 
lost  in  antiquity.  It  was  originally 
Chinese,  and  in  old  days,  along  with 
calligraphy  and  flower  arranging  was 
considered  one  of  the  three  classic  arts. 


Background  on  GO 


COMPUTER  GAMES 


It  came  to  Japan,  along  with  the  char¬ 
acters  and  with  Buddhism,  around  the 
7th  century,  and  has  been  played  there 
steadily  ever  since.  With  minor  modifi¬ 
cations  (e.g.  the  board  size  was  in¬ 
creased  from  17  x  17  to  the  present  19 
X  19)  the  rules  have  remained  the 
same,  and  as  such,  it  must  surely  be  one 
of  the  oldest  essentially  unchanged 
human  intellectual  activities.  There 
exist  fragmentary  game  records  which 
are  very  old,  and  essentially  complete 
game  scores  from  the  12th  century.  I 
personally  find  it  quite  remarkable  that 
one  can  go  back  and  reconstruct  the 
exact  thought  processes  of  someone 
living  in  such  a  remote  epoch! 

“The  Japanese  are  now  the  most  avid 
players,  and  support  several  hundred 
professionals.  There  the  situation  is 
rather  comparable  to  say  tennis  or  golf 
in  this  country,  with  a  hundred  or  so 
people  who  can  live  from  tournament 
winnings,  and  others  who  survive  from 
teaching.  The  most  important  tourna¬ 
ment,  the  Kisei,  has  a  total  prize  fund  of 
around  $1  million,  and  is  held  an¬ 
nually.  The  major  professional  associa¬ 
tion  is  the  Nihon  Kiin,  in  Tokyo,  which 
has  a  large  building  (including  hotel 
rooms),  and  which  certifies  players  and 
controls  grades.  There  is  also  the  some¬ 
what  smaller  Kansai  Kiin,  which  has 
headquarters  in  Osaka. 

“The  rating  scale  is  in  Kyus  and 
Dans.  An  absolute  beginner  starts 
around  30  Kyu,  and  grows  in  strength 
up  to  1  kyu.  The  weakest  Dan  grade  is  1 
dan,  and  they  progress  in  strength  up  to 
6  or  7.  These  are  amateur  grades,  which 
are  used  world- wide,  and  an  attempt  is 
made  to  keep  them  in  international 
alignment.  In  addition,  there  are  the 
professional  grades,  increasing  in 
strength  from  1  to  9  dan.  Professional  1 
dan  (or  shodan  as  it’s  usually  called)  is 
a  little  stronger  than  the  strongest  ama¬ 
teur  grade,  and  they  move  up  very  sub¬ 
stantially.  Even  full-time  pros  cannot 
hope  to  advance  much  faster  than  a 
grade  every  other  year,  and  most  never 
will  reach  9  dan. 

“The  Chinese  and  Koreans  both 
have  some  players  of  professional 
strength,  but  westerners  don’t  look  too 
well.  After  many  years  in  the  profes¬ 
sional  training  school,  last  year  an 
Austrian,  Manfred  Wimmer,  and  an 
American,  James  Kerwin,  were  given 


ratings  of  provisional  professional 
shodan.  Wimmer  was  soon  promoted 
to  2-dan,  and  Kerwin  has  since  won  the 
1  -dan  division  of  the  Kisei  Elimination 
Tournament  in  Japan.  Thereby,  he 
achieved  the  first  win  by  a  Westerner  in 
a  professional  Go  tournament. 

“Go  and  computers:  For  some  years, 
there  have  been  attempts  to  get  com¬ 
puters  to  solve  tactical  Go  problems, 
for  instance  about  life  or  death  of  small 
comer  groups.  The  whole-game  pro¬ 
gram  in  this  country  was  part  of  a  Ph.D. 
thesis  by  Albert  Zobrist  (“Feature 
Extraction  and  Representation  for 
Pattern  Recognition  and  the  Game  of 
Go.’’)  The  next  was  by  Jon  Ryder,  in 
another  Ph.D.  thesis  at  Stanford, 
(“Heuristic  Analysis  of  Large  Trees  as 
Generated  in  the  Game  of  Go.  ’’)  1971. 
Unfortunately  neither  of  these  is  able  to 
defeat  anything  but  the  rankest  be¬ 
ginner,  and  as  long  as  the  analysis  is  on 
a  19  X  19  board,  it  is  not  clear  how 
soon  that  will  change.  Each  of  them 
showed  the  influence  of  chess  and 
checker  analysis,  namely  the  attempt  to 
extract  certain  salient  features  of  a 
position,  take  a  weighted  sum,  and 
choose  the  move  with  the  highest  score. 
A  more  elaborate  description  of 
Ryder’s  work  has  since  appeared  in  the 
American  Go  Journal. 

“The  strongest  player  anywhere 
interested  in  computing,  as  far  as  I 
know,  is  Jon  Diamond,  a  6-dan  player, 
who  recently  retired  as  undefeated  Brit¬ 
ish  champion.  He  is  still  active  profes¬ 
sionally  in  computing.  In  addition,  in 
this  country,  David  Benson,  Prof,  of 
Computer  Science  a  Washington  State 
U.,  Pullman,  WA  91 163,  has  a  number 
of  graduate  students  working  on  the 
problem. 

“For  various  reasons.  Go  seems  to 
me  to  be  a  better  game  than  chess  for  AI 
work.  For  one  thing,  the  rules  are  less 
artificial.  After  all,  you  could  change 
the  initial  starting  position,  or  exact 
move  descriptions  in  chess,  and  have  a 
game  about  as  good.  All  that  must  be 
programmed  around,  but  one  isn’t 
learning  from  it.  Also,  the  opening  is 
not  nearly  so  stereo- typed,  and  there  is 
nothing  like  the  business  of  reading 
books  for  10  moves.  Finally,  because 
not  everything  rides  on  a  single  event 
like  mate,  but  the  accumulation  of  terri¬ 
tory,  the  best  move  may  float  from 


move  to  move  around  the  board,  and 
one  must  constantly  watch  the  growing 
together  of  a  dozen  or  more  positions. 
Go,  is  simply  an  astronomically  larger 
game  than  chess  (say  an  average  of  200 
legal  moves  going  on  for  200  half¬ 
moves,  in  contrast  to  say  100  moves 
over  100  half-moves.) 

“The  strongest  current  programs  can 
scarcely  beat  someone  who  has  just 
learned  the  rules.  But  there  is  one  thing 
that  might  help,  and  that  is  to  reduce  the 
board  size.  If  one  plays  fairly  well,  one 
eventually  becomes  persuaded  that  19 
x  19  is  the  best  size  board.  But  when 
one  is  learning,  it’s  much  better  to  start 
say  on  9  x  9.  Otherwise  the  period 
between  incorrect  move  and  punish¬ 
ment  may  be  100  moves,  and  that 
makes  it  hard  to  learn.  But,  while  less 
interesting  for  an  expert,  the  game  is 
largely  the  same  on  the  smaller  board, 
and  that  might  make  enough  reduction 
in  exhaustive  searches  to  make  a  rea¬ 
sonably  strong  program  feasible.  I 
suspect  that  with  substantial  but  rea¬ 
sonable  effort,  it  might  be  possible  to 
put  such  a  thing  on  a  few  chips,  or  a 
micro,  and  there  might  well  be  some 
money  to  be  made  by  someone  with  the 
determination  to  do  it.  I  hope  some  of 
this  will  be  found  interesting  or  useful 
by  your  readers.’’ 

A  New  Micro 
Program  for  Go 
on  Cassette 

Hal  Muller  of  Toronto , 
Canada ,  who  teaches  computer 
science  and  mathematics ,  has 
written  what  is  apparently  the 
first  GO  program  for  a  micro¬ 
computer.  The  routine ,  which 
runs  on  an  8K  PET ,  is  a  modified 
version  of  regulation  GO.  its 
main  modification  is  the  use  of  a 
9  X  9  grid  instead  of  the  19  x  19. 

“ But  otherwise says  Professor 
Muller ,  “the  program  follows  all 
the  rules  and  logic  of  GO."  (See 
his  ad  in  the  classified  section  of 
the  Computer  Chess  Depart¬ 
ment.) 


- COMPUTER  BRIDGE - 

Old  Hands  and  New  Deals 


This  column  is  being  devoted  to  a  dis¬ 
cussion  of  some  deals  as  bid  and  played 
by  the  Bridge  Challenger  of  Fidelity 
Electronics.  The  play  of  the  Challenger 
will  be  compared  to  the  play  of  my  own 
bridge  playing  program.  Also,  I  am 
passing  along  some  comments  received 
from  Jim  Hilger  on  the  performance  of 
his  program  with  some  deals  discussed 
in  this  column. 

For  those  of  you  who  are  new 
readers,  the  general  characteristics  of 
Fidelity’s  Bridge  Challenger  were 
discussed  last  year  in  the  July,  Septem¬ 
ber  and  December  issues  of  PER¬ 
SONAL  COMPUTING.  As  mentioned 
in  those  columns,  Bridge  Challenger 
will  bid  and  play  one,  two,  three  or 
even  all  four  hands  while  human 
players  bid  and  play  the  remaining 
hands. 

The  following  deal  is  from  the  1979 
November  bridge  column: 

COMPUTER 

NORTH 

(Dummy) 

♦  QJ 10532 

V  KQ 

♦  AQ974 

4  — 


WEST 

EAST 

4  K9864 

♦  A7 

¥  J8 

V  653 

4  J6 

♦  K1032 

4  A543 

♦  10982 

COMPUTER 

SOUTH 

(Declarer) 

♦  — 

¥  A109742 
♦  85 
4  KQJ76 

With  South  as  dealer,  and  Bridge 
Challenger  playing  the  N-S  cards,  the 
bidding  by  the  computer  device  is  as 
follows: 

Bidding 


South 

West 

North 

East 

1H 

Pass 

2S 

Pass 

3C 

Pass 

4 S 

Pass 

5H 

Pass 

Pass 

Pass 

6H 

Pass 

Looking  at  the  North-South  cards, 
the  slam  contract  is  a  bit  ambitious.  To 


BY  THOMAS  A.  THROOP 

make  the  slam  with  good  play  requires 
that  West  hold  the  diamond  king,  that 
the  heart  jack  be  a  doubleton,  that  the 
club  suit  be  divided  4-4  or  certain  other 
favorable  club  holdings  exist  with  cor¬ 
rect  guessing  on  your  part,  and  that  a 
trump  not  be  opened  by  West  when 
East  holds  the  ace  of  clubs. 

The  play  of  the  cards,  with  my  play¬ 
ing  the  E-W  cards,  is  shown  in  the 
accompanying  tableau.  I  opened  the 
jack  of  diamonds  from  the  West  hand. 
Somewhat  to  my  surprise,  the  Chal¬ 
lenger  did  not  recognize  the  finesse 
combination  in  diamonds  and  incor¬ 
rectly  went  up  with  dummy’s  ace.  It 
then  played  two  rounds  of  trump,  not 
realizing  that  one  club  must  be  ruffed  in 
dummy  at  some  point.  The  Challenger 
then  entered  declarer’s  hand  with  a 
spade  ruff  and  drew  the  last  enemy 
trump.  At  trick  6  Challenger  attacked 
the  club  suit,  leading  the  king  to  drive 
out  the  ace.  I  won  with  West’s  ace  and 
returned  a  spade.  The  computer  played 
the  5  from  dummy,  I  necessarily  played 
East’s  ace,  and  Challenger  ruffed.  The 
electronic  unit  continued  playing  clubs 
and  lost  a  trick  to  East’s  10  at  trick  10. 1 
then  cashed  East’s  king  of  diamonds. 
The  last  two  tricks  were  won  by  N-S, 
for  a  final  result  of  1 0  tricks  won  by  N-S 
and  3  won  by  E-W. 


w 

N 

E 

S 

Trick  1 

JD 

AD? 

3D 

5D 

2 

8H 

QH? 

3H 

2H 

3 

JH 

KH? 

5H 

4H 

4 

4S 

2S 

7S 

7H 

5 

6S 

3S 

6H 

AH 

6 

AC 

4D 

2C 

KC 

7 

8S 

5S 

AS 

9H 

8 

3C 

10S 

8C 

QC 

9 

4C 

7D 

9C 

JC 

10 

5C 

JS 

10C 

7C 

11 

6D 

9D 

KD 

8D 

12 

9S 

QD 

10D 

6C 

13 

KS 

QS 

2D 

10H 

Tricks  N-S  (Challenger):  10 
Tricks  E-W:  3 


The  play  of  this  same  deal  by  my 
program  was  discussed  in  detail  in  the 
1979  November  column.  On  two  signi¬ 
ficant  points  its  play  differed  from  that 
of  the  Bridge  Challenger.  First,  at  trick 
1 ,  my  program  recognized  the  finesse 


situation  in  diamonds  and  finessed 
North’s  queen.  Second,  my  program 
recognized  the  need  for  a  club  ruff  at 
some  point  and  took  a  ruffing  club  fin¬ 
esse  with  king  of  clubs  at  trick  4.  The 
finesse  was  continued  at  trick  5  when 
West  ducked  with  the  3  of  clubs  at  trick 
4. 

The  complete  play  of  the  deal  by  my 
program  is  shown  below.  Eleven  tricks 
were  won  by  the  computer  as  N-S;  E-W 
won  only  the  diamond  king  and  one 
additional  trick  with  the  10  of  clubs. 


w 

N 

E 

s 

Trick  1 

JD 

QD 

KD 

5D 

2 

8H 

KH 

3H 

2H 

3 

4S 

2S 

7S 

4H 

4 

3C 

3S 

2C 

KC! 

5 

AC 

QH 

8C 

QC 

6 

6S 

5S 

AS 

7H 

7 

JH 

4D 

5H 

AH 

8 

8S 

7D 

6H 

10H 

9 

4C 

10S 

9C 

JC 

10 

5C 

9D 

10C 

7C 

11 

6D 

AD 

2D 

8D 

12 

9S 

JS 

3D 

10H 

13 

KS 

QS 

10D 

6C 

Tricks  N-S  (computer):  1 1 
Tricks  E-W:  2 


The  following  deal  was  generated  by 
my  dealing  routine  on  the  day  I  pre¬ 
pared  this  article.  The  deal  which  was 
given  to  both  Fidelity’s  Challenger  and 
to  my  program  was  as  follows: 

COMPUTER 
NORTH 
(Dummy) 

4  10632 
¥  A982 
♦  K3 

WEST  *K109 

4  J84 

¥7 

♦  A106 

4  AJ8753 

COMPUTER 
SOUTH 
(Declarer) 

4  AK9 
¥  Q4 
¥  QJ975 
4Q42 

South  was  assumed  to  be  the  dealer 
with  Bridge  Challenger  playing  the  N-S 


EAST 
4  Q75 
¥  KJ 10653 
4  842 

46 
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cards.  The  bidding  by  Challenger,  with 
no  bidding  by  the  E-W  hands,  was  as 
follows: 

Bidding 


South 

West 

North 

East 

ID 

Pass 

1H 

Pass 

2NT 

Pass 

2NT 

Pass 

3NT 

Pass 

Pass 

Pass 

As  West,  I  made  the  normal  opening 
lead  of  the  7  of  clubs  against  the  com¬ 
puter’s  3-no-trump  contract.  Chal¬ 
lenger  played  the  9  from  dummy, 
which  won  the  trick.  The  unit  now 
made  a  serious  blunder,  dooming  the 
contract  to  defeat;  the  spade  suit,  rather 
than  the  diamond  suit,  was  attacked. 
The  10  of  spades  was  led  from  dummy 
(if  spades  are  led,  the  deuce,  rather  than 
the  10,  should  be  led).  I  followed  with 
East’s  5,  Challenger  played  South’s  9, 
and  I  won  with  West’s  jack.  I  now 
played  West’s  ace  of  clubs  and  fol¬ 
lowed  with  the  3  of  clubs,  clearing  the 
last  stopper  from  the  N-S  hands.  The 
Challenger  now  turned  to  the  diamond 
suit,  but  it  was  too  late.  When  I  won 
North’s  king  with  West’s  ace,  I  was 
able  to  cash  three  club  tricks  thereby 
setting  the  contract  by  two  tricks.  On 
the  jack  and  8  of  clubs  the  Challenger 
made  incorrect  discards,  throwing 
possible  winning  diamonds  rather  than 
a  losing  heart.  On  the  5  of  clubs  the 
Challenger  finally  discarded  the  losing 
heart.  Tricks  9-13  were  won  by  Chal¬ 
lenger’s  cashing  its  remaining  winners. 
The  complete  play  of  the  deal  is  shown 
in  the  accompanying  tableau. 


w 

N 

E 

S 

Trick  1 

7C 

9C 

6C 

2C 

2 

JS 

10S? 

5S 

9S 

3 

AC 

10C 

6H 

4C 

4 

3C 

KC 

3H 

QC 

5 

AD 

KD 

2D 

5D 

6 

JC 

2S 

4D 

7D? 

7 

8C 

3S 

8D 

9D? 

8 

5C 

6S 

5H 

4H 

9 

7H 

AH 

10H 

QH 

10 

6D 

3D 

JH 

QD 

11 

10D 

2H 

KH 

JD 

12 

4S 

8H 

7S 

AS 

13 

8S 

9H 

QS 

KS 

Tricks  N-S  (Challenger):  7 
Tricks  E-W:  6 

After  finishing  this  deal  with 
Fidelity’s  Challenger,  I  gave  the  same 
distribution  with  the  same  final  contract 
to  my  program  for  play.  As  West,  I 


again  opened  the  7  of  clubs  in  order  to 
present  my  computer  declarer  with  the 
same  situation  as  faced  by  the  Fidelity 
declarer.  My  program  also  played  the  9 
from  dummy,  winning  the  trick  in  the 
same  manner  as  the  Challenger.  How¬ 
ever,  now  at  trick  2,  my  program  pro¬ 
perly  attacked  the  diamond  suit  with  the 
lead  of  the  king  of  diamonds  from 
North.  I  won  with  West’s  ace  of  dia¬ 
monds  and  then  played  the  ace  and 
another  club  to  drive  out  the  last  N-S 
stopper.  My  program  now  ran  the 
diamond  suit,  won  the  ace  of  hearts  and 
the  ace-king  of  spades  to  make  3  no- 
trump,  whereas  Challenger  went  down 
2  tricks.  The  complete  play  is  shown  in 
the  tableau  below: 


w 

N 

E 

S 

Trick  1 

7C 

9C 

6C 

2C 

2 

AD 

KD 

2D 

5D 

3 

AC 

10C 

6H 

4C 

4 

3C 

KC 

3H 

QC 

5 

6D 

3D 

4D 

QD 

6 

10D 

2H 

8D 

JD 

7 

7H 

2S 

5H 

9D 

8 

5C 

3S 

10H 

7D 

9 

8C 

AH 

JH 

4H 

10 

4S 

6S 

5S 

AS 

11 

8S 

10S 

7S 

KS 

12 

JS 

8H 

QS 

9S 

13 

JC 

9H 

KH 

QH 

Tricks  N-S  (Throop  program):  9 

Tricks  E-W:  4 

In  December  1979,  at  the  Greater 
New  York  Bridge  Association  Re¬ 
gional  Tournament,  I  was  scheduled  to 
demonstrate  my  program  together  with 
Fidelity’s  Challenger,  in  the  play  of 
several  deals  which  each  program  will 
see  for  the  first  time.  The  results  of 
this  match  will  appear  in  my  March 
column. 

A  new  bridge  bidding  and  playing 
program  has  been  written  by  Jim  Hilger 
of  53 15  17th  Ave.,  Moliner,  IL61265. 
Jim,  who  owns  an  Apple  II  computer 
with  a  floppy  disk,  has  written  two 
major  bridge  programs  in  “integer 
basic”.  These  programs,  a  BID  pro¬ 
gram  and  a  DEFENSIVE  PLAY  pro¬ 
gram,  each  require  about  16K  of 
memory.  These  two  programs,  to¬ 
gether  with  some  very  small  programs 
to  link  the  two  major  programs,  form  a 
bridge  system  he  has  named  “TRIK 
1.0”. 

The  user  of  TRIK  1 .0  is  first  asked 
whether  he  would  like  to  play  a  deal 


previously  saved  on  the  disk  or  play  a 
new  deal.  The  bidding  program  then 
bids  for  North,  East,  and  West,  while 
the  user  bids  the  South  hand.  The  dealer 
is  determined  randomly  by  the  pro¬ 
gram.  At  the  conclusion  of  the  bidding, 
if  the  final  contract  is  a  N-S  contract, 
then  you  may  play  the  N-S  cards  while 
the  defensive  play  program  defends 
against  the  contract,  just  as  does  the 
Duisman  program. 

Jim  has  sent  along  several  examples 
of  deals  bid  and  played  by  his  TRIK 
1.0.  Two  of  them  are  deals  which  I 
discussed  in  my  1979  August  column. 
These  are  deal  #32  of  set  3.65  as 
generated  by  the  PET  Version  of  the 
Duisman  program  and  the  example  of 
Wasserman’s  bidding  program.  The 
bidding  and  defensive  play  of  deal  #32 
and  the  bidding  of  the  Wasserman  deal 
by  Jim’s  program  are  shown  in  the 
accompanying  tableaus. 

NORTH 

♦  J76 

¥  AK85 

♦  Q104 

♦  1032 


WEST 

EAST 

♦  8532 

♦  KQ 

¥  J1063 

r  9742 

♦  52 

♦  K8763 

4  874 

SOUTH 

♦  A 1094 

♦  Q 

♦  AJ9 

4  AQ965 

4  KJ 

BIDDING  (West  dealt.) 


(YOU) 

SOUTH  WEST  NORTH  EAST 


Pass 

Pass 

ID 

Double 

Pass 

1H 

Pass 

3C 

Pass 

3N 

Pass 

Pass 

Pass 

PLAY: 

w 

N 

E 

s 

Trick  1 

S2 

S6 

SK 

SA 

2 

S3 

S7 

SQ 

S10 

3 

D2 

D10 

D3 

D9 

4 

C4 

C2 

CJ 

CQ 

5 

H3 

H5 

H2 

HQ 

6 

C7 

C3 

CK 

CA 

7 

S5 

SJ 

H4 

S4 

8 

D5 

DQ 

D6 

DJ 

9 

H6 

HA 

H7 

C5 

10 

H10 

HK 

H9 

C6 

11 

C8 

CIO 

D7 

C9 

12 

S8 

D4 

D8 

DA 

13 

HJ 

H8 

DK 

S9 

Made,  3  overtricks. 
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Sample  hand  from  Wasserman’s  “Bid 
Program”  (described  in  a  previous 
issue.) 

NORTH 

♦  AQ64 

V  10% 

♦  53 

♦  Q765 

WEST  EAST 

♦  J97  *3 

VAQ852  V  3 

♦  1062  ♦  AKQJ874 

♦  A8  4  J1093 

SOUTH 

♦  K 10852 

V  KJ74 

♦  9 

4  K42 

BIDDING  (West  dealt.) 

(YOU) 


SOUTH 

WEST 

NORTH 

EAST 

Pass 

Pass 

ID 

Pass 

1H 

Pass 

2D 

Pass 

2N 

Pass 

3D 

Pass 

4D 

Pass 

Pass 

Pass 

PLAY:  N/A 


Regarding  the  Duisman  deal  #32, 
TRIK  1.0  (and  Jim)  reached  my 
original  proposed  contract  of  3  no- 
trump.  As  West,  TRIK  1.0  opened  the 
2  of  spades  against  the  3  no-trump 
contract,  Jim  played  the  6  from 
dummy,  the  program  played  East’s 
king,  and  Jim  won  with  the  ace.  In 
order  to  reach  dummy  with  the  jack  of 
spades,  Jim  now  led  the  spade  10  to 
drive  out  the  queen.  As  East,  the  pro¬ 
gram  then  led  the  3  of  diamonds  at  trick 
3,  after  winning  the  queen  of  spades. 
Jim  played  the  9  from  South  and  won 
with  North’s  10  to  reach  the  dummy  for 
the  club  finesse.  The  club  suit  was  very 
friendly  and  Jim  eventually  won  twelve 
tricks. 

In  the  case  of  the  Wasserman  deal, 
Jim  passed  with  the  South  hand  after 
TRIK  1.0,  playing  East,  opened  l 
diamond.  The  program  reached  4 
diamonds  with  the  East- West  cards. 
Jim  bid  the  deal  a  second  time  with  his 
program,  this  time  doubling  1  diamond 
with  the  South  hand  to  be  consistent 


with  the  Wasserman  sequence,  al¬ 
though  South  does  not  have  the  values 
for  a  takeout  double.  TRIK  1.0  then 
redoubled  as  West,  bid  1  spade  for 
North,  and  2  diamonds  for  East,  just  as 
did  the  Wasserman  bidding  program. 
Jim  then  bid  2  spades  for  South  to 
follow  the  Wasserman  sequence,  after 
which  TRIK  1 .0  bid  3  hearts  for  West, 
pass  for  North,  and  4  diamonds  for 
East.  With  27  points  in  the  combined 
E-W  hands  and  the  solid  trump  suit,  4 
diamonds  is  quite  a  conservative  con¬ 
tract.  Five  diamonds,  which  was 
reached  by  the  Wasserman  bidding 
program,  can  be  made  against  any 
defense. 


Next  month  I  plan  to  discuss  more  of 
the  deals  sent  in  by  Jim.  For  those  of 
you  with  questions  about  any  of  the 
deals  appearing  in  this  column,  please 
let  me  hear  from  you.  Also,  remember 
to  send  in  your  responses  to  the  bridge 
survey  that  appeared  in  the  October 
issue.  — T.T. 


MAKE  YOUR  TRS-80  A  3-SPEED 

This  simple  addition  allows  either  normal  operation,  a  50%  increase,  or  a  50% 
decrease  in  CPU  speed.  Unlike  other  speed  mods,  this  one  may  be  changed  AT  ANY 
TIME  without  interrupting  program  execution.  This  is  critical  in  machine  language 
programs  where  there's  no  software  access.  Shortens  calculations,  sorts,  and 
CLOAD  and  CSAVE  times.  The  low  speed  simplifies  de-bugging,  slows  a  Level  II 
LIST,  and  ELIMINATES  KEY-BOUNCE  without  software  overhead.  Fits  inside  the 
keyboard  unit  with  only  4  easily  accessible  connections,  and  is  easily  removed  if  the 
computer  ever  needs  service.  The  Mumford  Micro  3-speed  kit  has  been  field  proven 
by  its  many  users  and  complete  satisfaction  is  guaranteed.  Kit  includes  all  parts  and 
clearly  illustrated  instructions  for  $24.95.  Fully  assembled  and  tested^^$29.95 

DUPLICATE  SYSTEM  TAPES  WITH  “CLONE” 

This  machine  language  program  makes  duplicate  copies  of  ANY  tape  written  for 
Level  II.  They  may  be  SYSTEM  tapes  (continuous  or  not)  or  data  lists.  It  is  not 
necessary  to  know  the  file  name  or  where  it  loads  in  memory,  and  there  is  no  chance 
of  system  co-residency.  The  file  name,  entry  point,  and  every  byte  (in  ASCII  format) 
are  displayed  on  the  video  screen.  Data  may  be  modified  before  copy  is  produced. 
CLONE . $16.95 


RAM  TEST  FOR  LEVEL  II 

This  machine  language  program  tests  memory  chips  for  open  or  shorted  address  or 
data  lines  as  well  as  intermittents.  It  tests  each  BIT  for  validity  and  each  BYTE  in  the 
execution  of  an  actual  instruction  as  in  real  program  execution.  Bad  addresses  are 
displayed  along  with  the  bad  data  and  proper  data.  One  complete  test  of  48K  takes 
just  14  seconds.  Also  includes  a  test  for  errors  induced  by  power  line  glitches  from 
external  equipment.  RAMTEST . $9.95 


PROGRAM  INDEX  FOR  DISK  BASIC 

Assemble  an  alphabetized  index  of  your  entire  program  library  from  disk 
directories.  Program  names  and  free  space  are  read  automatically  (need  not  be 
typed  in)  and  may  be  alphabetized  by  disk  or  program.  The  list  may  also  be  searched 
for  any  disk,  program,  or  extension;  disks  or  programs  added  or  deleted;  and  the 
whole  list  or  any  part  sent  to  the  printer.  Finally,  the  list  itself  may  be  stored  on  disk 
for  future  access  and  update.  One  drive  and  32K  required.  INDEX . $19.95 

EDIT  BASIC  PROGRAMS  WITH  ELECTRIC  PENCIL 

This  program  allows  disk  users  to  load  BASIC  programs  or  ASCII  data  files  into  the 
disk  version  of  Electric  Pencil  for  editing.  Edit  line  numbers,  move  or  duplicate 
program  segments,  search  for  any  group  of  characters.  PENPATCH . $9.95 
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MUMFORD  MICRO  SYSTEMS 

BOX  435-D  SUMMERLAND,  CALIFORNIA  93067 
(805)  969-4557 


The  world’s  most  popular  microcomputer,  with  16K  of 
memory  and  Level  11  basic  for  only  $750,  complete 
with  full  90  day  Radio  Shack  warranty. 

We  accepy  check,  money  order  or  phone  orders  with 
Visa  or  Master  Charge. 

(Shipping  costs  added  to  charge  orders). 

Disk  drives,  printers,  periph¬ 
erals,  software  &  games. . . 
you  name  it,  we’ve  got  it 
(both  Radio  Shack  &  other 
brands).  Write  or  call  for 
our  complete  price  list. 


ELECTRONICS  MART,  LTD. 
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Computer  Power  for  Small  Businesses 


Computer  Power  for  the  Small  Busi¬ 
ness, by  Charles  J.  Sippl  and  Fred  Dahl; 
Prentice-Hall,  Inc.,  Englewood  Cliffs, 
NJ  07632;  306  pp.;  $6.95  paperback. 

Undoubtedly,  small  computers  can 
add  to  the  operating  efficiency  of  small 
businesses.  But  matching  a  computer 
system  to  specific  business  needs  can 
be  difficult  if  a  person  doesn’t  under¬ 
stand  the  fundamentals  of  buying  a 
computer.  According  to  Sippl  and 
Dahl,  “If  today’s  small  businessper¬ 
sons  and  middle  managers  can  develop 
the  familiarity  and  willingness,  then  the 
computer  can  ...  be  transformed  from  a 
risky  weapon  to  an  effective  business 
tool.’’ 

Computer  Power  was  written  to  fa¬ 
miliarize  business  people  with  comput¬ 
ers  and  help  them  develop  a  purchasing 
plan.  The  book  is  for  people  who  must 
make  the  purchasing  decision  and  ask: 
“Can  my  business  benefit  from  a  com¬ 
puter?’’ 

Buying  a  computer,  or  knowing 
whether  a  business  can  benefit  from  a 
computer,  requires  some  knowledge  of 
how  they  work.  The  book  begins  with  a 
condensed  yet  easily  digestible  descrip¬ 
tion  of  computers  and  their  operation. 
According  to  the  authors,  business 
people  only  need  to  understand  the  bas¬ 
ic  terminology  and  fundamental  criteria 
for  buying  computers. 

Next,  the  authors  describe  a  number 
of  computer  systems  available  for  busi¬ 
ness  applications.  These  systems  are 
arranged  in  order  of  size  and  cost. 

In  the  chapter  on  software,  readers 
can  find  ways  of  obtaining  programs 
for  their  needs.  Typical  programs  in¬ 
clude  inventory,  payroll,  general  ledg¬ 
er,  balance  sheet  and  mailing  lists.  A 
person  can  learn  the  computer  language 
and  write  programs;  buy  general, 
“canned’’  programs  from  software  pro¬ 
ducers;  or  hire  consultants  to  write  cus¬ 
tom  programs  for  specific  needs 

The  authors  included  three  helpful 
tables  in  these  beginning  chapters.  One 
table  lists  74  computer  systems,  with 
information  such  as  memory  capa¬ 
bilities,  type  of  central  processing  unit, 
basic  system  cost  and  additional  fea¬ 
tures.  Another  table  lists  the  types  of 
programs  —  and  their  applications  — 
offered  by  computer  system  manufac¬ 


turers.  The  third  table  lists  22  other 
program  sources,  with  address  and  pro¬ 
duct  descriptions.  While  these  tables 
may  not  be  complete,  they  make  a  use¬ 
ful  guide  to  knowing  what’s  available. 

After  orienting  the  reader  to  comput¬ 
er  systems  and  applicatins,  Sippl  and 
Dahl  address  the  problem  of  deciding 
whether  to  buy  the  computer.  (The 
computer’s  cost-effectiveness  may  not 
justify  the  system’s  cost  to  the  busi¬ 
ness.)  They  begin  by  outlining  a  plan  to 
make  the  purchasing  decision  and  then 
how  to  choose  a  particular  system.  The 
plan  basically  covers  three  points: 

•  Define  the  need  by  looking  at  prob¬ 
lem  areas  in  the  business  “where  com¬ 
puterization  may  be  a  source  of 
improvement’’ 

•  Evaluate  whether  the  available 
software/hardware  can  fill  the  need 


Running  Wild  —  The  Next  Industrial 
Revolution,  by  Adam  Osborne; 
Osbome/McGraw-Hill,  Inc.,  630 
Bancroft  Way,  Berkeley,  CA  94710, 
181  pages,  $3.95  paperback. 

•  Radio  Shack  sold  one  hundred 
million  dollars  worth  of  microcomputer 
systems  in  the  first  18  months  the  TRS- 
80  was  available. 

•  Apple  Computer,  founded  by  24- 
year-old  Steve  Jobs  and  20-year-old 
Steve  Wosniak,  who  designed  their 
microcomputer  for  the  fun  of  it,  will 
probably  gross  more  than  fifty  million 
dollars  in  1979. 

•  Alpha  Micro  Systems,  founded  in 
1977  by  three  men  with  $50,000  worth 
of  equipment  and  $1000  in  cash,  sold 
approximately  five  million  dollars 
worth  of  computer  systems  in  1978  and 
may  have  doubled  that  in  1979. 

•  Because  of  new  microelectronic 
innovations,  the  post  office  as  we  know 
it  today  will  disappear  within  the  next 
20  years  —  possibly  within  the  next  ten. 

•  Soon  IBM  will  be  facing  stiff 
competition,  not  from  its  traditional 
rivals  such  as  Burroughs,  Univac, 
Honeywell  and  NCR,  but  from  such 
upstarts  as  Apple  Computer  Corpora¬ 
tion,  Radio  Shack,  Commodore, 


•  Select  the  system  based  on  criteria 
previously  outlined  in  the  book 

Also  included  are  the  implications  of 
owning  a  computer,  such  as  the  effect 
on  personnel. 

The  final  chapters  discuss  cases  of 
computers  in  businesses  ranging  from 
law  firms  to  libraries,  and  alternate  uses 
of  computers  in  automation,  energy 
conservation  and  security. 

In  their  book,  Sippl  (a  former  in¬ 
structor  and  lecturer  in  computer  elec¬ 
tronics)  and  Dahl  (a  small  business¬ 
man)  use  a  light  and  conversational 
writing  style.  They  also  write  in  terms 
of  the  business  —  applications,  cost 
and  efficiency.  And  with  their  back¬ 
ground  and  an  ample  supply  of  illustra¬ 
tions,  the  authors  provide  the  specific 
information  and  insight  that  a  decision 
maker  needs .  —  Joe  Bobbey 


Pertec,  Texas  Instruments,  and  the 
whole  wolf  pack  of  little  guys. 

Sound  incredible?  It  is.  It’s  only  the 
beginning. 

Dr.  Adam  Osborne,  internationally 
known  author,  lecturer,  spokesman  and 
publisher  in  the  world  of  microelec¬ 
tronics,  a  man  who  has  been  an  integral 
part  of  the  field  during  its  rapid 
development  over  the  past  five  years, 
scrutinizes  the  industry  and  projects  its 
effects  into  the  future.  What  he  sees  in 
his  crystal  chip  will  shake  society  as 
we’ve  come  to  know  it.  Buck  Rogers  is 
alive  and  well  in  the  1980s. 

Running  Wild  spells  out  how  micro¬ 
electronics  got  this  far  and  gives 
knowledgeable  insight  into  what’s 
likely  to  occur  next.  But  Dr.  Osborne  is 
no  wild-eyed  augur  enchanted  with  the 
concept  of  microelectronics  because 
with  his  predictions  (stockbrokers, 
airline  reservationists,  communication 
workers  and  secretaries  could  be 
eliminated;  medicine  and  education 
will  be  profoundly  changed)  come 
warnings  of  new  horizons  for  thieves 
and  embezzlers. 

Running  Wild  will  be  of  value  to  two 
segments  of  society:  that  portion  which 
has,  at  some  time,  had  contact  with 
computers;  and  the  more  general 


An  Industrial  Revolution 


nn 


- 1 


BOOKSHELF 


population  who  can’t  have  helped  but 
notice  the  proliferation  of  electronic 
games,  computers  for  cars,  electronic 
calculators,  watches  and  sewing  ma¬ 
chines,  general  computer  ads  on 
television,  the  TVs  themselves, 
microwave  ovens  and  a  myriad  of  other 
applications. 

Huge  volumes  will  be  written  some 
day  explaining  in  retrospect  the  history, 
development  and  social  impact  of 
microelectronics;  many  things  will  be 
obvious  by  that  time.  Osborne’s  book 
puts  you  into  the  next  industrial  revolu¬ 
tion  as  it’s  happening.  Written  in  highly 
entertaining,  anecdotal  style.  Running 


Wild  explains  technical  concepts  in 
layman’s  terms. 

Next  to  your  user’s  manual,  Running 
Wild  could  tell  you  more  about  the 
power  and  future  of  your  microcom¬ 
puter  than  anything  published  to  date. 
With  its  low  price  and  readable  text, 
this  little  book  should  be  required 
reading  from  grammar  school  on  up. 

The  revolution  is  upon  us.  Incredible 
change  takes  place  every  day,  yet  it’s 
only  a  bit  in  the  bytes  to  come.  Osborne 
tells  you  where  we  are  and  forces  you  to 
think  about  where  we’re  going.  Your 
answers  today  will  map  the  structure  of 
tommorrow .  — Ken  Mazur 


Getting  Down  to  Business 


Getting  Down  to  Business  with  Your 
Microcomputer ,  by  James  A.  Gupton 
Jr.;  Sourcebooks,  Northridge,  CA 
91324;  245  pp.;  $9.95  paperback. 

As  hobbyists,  homemakers  and  busi¬ 
ness  people  with  little  knowledge  of 
computers  find  microcomputers  enter¬ 
ing  their  worlds,  they  need  to  know 
more  than  what  computers  are  and  how 
they  work.  Getting  Down  to  Business 
with  Your  Microcomputer  fills  that 
need  by  specifically  showing  the  use¬ 
fulness  of  computers,  what  kinds  are 
available  and  how  to  buy  them.  In  his 
book,  Gupton  attempts  to  provide  “a 
guide  to  the  intelligent  selection  of 
computer  components  and  aid  in  the 
assembly  of  your  own  personal  com¬ 
puter  system.” 

Gupton  briefly  introduces  readers  to 
microcomputers  in  the  opening  chap¬ 
ters.  He  describes  the  computing  pro¬ 
cess  and  fundamental  computer  com¬ 
ponents.  These  descriptions  include 
specific  models  (with  illustrations 
throughout  the  book)  and  brand  names. 
For  example,  in  explaining  how  micro¬ 
processors  work,  he  compares  the  ma¬ 
jor  products,  such  as  the  Intel  8080A, 
Motorola  6800  and  Zilog  Z-80. 

Next,  the  author  compares  selected 
entire  microcomputer  systems.  Each 
system  —  those  by  Radio  Shack, 
Heathkit,  Altair,  Apple,  Ohio  Scien¬ 
tific  and  five  other  producers  —  is  de¬ 
scribed  along  with  its  special  features. 
However,  because  Gupton  does  not 
discuss  specific  disadvantages  of  the 
systems,  these  chapters  tend  to  sound 


like  a  collection  of  sales  promotions. 
Also,  the  reader  must  rely  on  other 
sources  to  find  out  about  available  sys¬ 
tems  not  included  in  the  book.  A  com¬ 
plete  list  of  addresses  of  the  named  sys¬ 
tem  companies  appears  in  an  appendix. 

Finally,  the  book  offers  suggestions 
on  how  to  select  a  microcomputer  for 
the  home  or  business. 

Other  purchasing  tips  on  what  fea¬ 
tures  to  look  for  can  be  found  in  the 
product  descriptions.  But  the  author 
reminds:  “The  first  step  in  choosing  a 
microcomputer  system  is  to  determine 
for  what  it  will  be  used  and  what  level 
of  performance  these  applications  will 
require.” 

A  highlight  of  this  book  is  its  resem¬ 
blance  to  a  general  owner’s  manual. 
Gupton  gives  an  idea  of  the  care,  oper¬ 
ation  and  maintenance  involved  in 
owning  a  microcomputer.  For  ex¬ 
ample,  in  a  discussion  of  audio  tape 
cassette  data  storage,  Gupton  warns: 
“Do  not  rewind  magnetic  tape  prior  to 
storage.  The  fast  motion  will  create 
stresses  in  the  tape  that  may  in  time 
cause  it  to  stretch.  Instead,  rewind  the 
tape  only  before  use.” 

Despite  this  specific  and  detailed  in¬ 
troduction  to  microcomputers,  beginners 
should  feel  comfortable  reading  it.  The 
book  is  well  written  by  the  author  of 
over  200  articles  on  electronics  and 
photography.  Also,  technical  terms 
are  carefully  defined.  So  as  Gupton 
promised  in  his  introduction,  beginners 
should  have  a  workable  understanding 
of  microcomputers  after  reading  the 
book.  — Joe  Bobbey 


TRS-80 

SAVE  10%,  15% 

and  more  on  computers,  peripherals,  soft¬ 
ware,  and  other  Radio  Shack®  products. 

Offered  Exclusively  By 

PAN  AMERICAN  ELECTRONICS,  INC. 

RadM/haelf 

Authorized  Sales  Center 

1117  CONWAY  MISSION,  TX  78572 

EAST  212/283-0534 
WEST  213/564-5463 
NORTH  CENTRAL  312/666-6098 
SOUTH  CENTRAL  512/581-2765 

(main  telephone  number)  f  ^ 

[wm\ 

NO  TAXES  on  out-of-state  shipments. 

FREE  delivery  available  on  minimum  orders. 
WARRANTIES  honored  by  Radio  Shack® . 
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c-io  ,  SHORT  so  ft. 
CASSETTES 


Qty.  Price 


Premium  tape  and  cassettes  acclaimed 


by  thousands  of  repeat  order  microcom¬ 
puter  users.  Price  includes  labels,  cas¬ 
sette  box  and  shipping  in  U.S.A.  VISA 
and  M/C  orders  accepted.  California 
residents  add  sales  tax.  Phone  (408) 
735-8832. 


MICROSETTE  CO. 
777  Palomar  Avenue 
Sunnyvale*  CA  94086 
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Top-Notch  Software 

from  The  Bottom  Shelf  BY  KEN  MAZUR 


If  you’re  looking  for  good,  solid,  pro¬ 
fessional  software  for  your  Level  II 
TRS-80  at  a  reasonable  price,  check 
into  The  Bottom  Shelf  (TBS).  I  think 
you’ll  be  glad  you  did. 

In  running  Checkbook  II,  Info  Sys¬ 
tem,  Basic  Toolkit  and  System  Doctor, 
I  was  impressed  with  the  quality  of  pro¬ 
gramming.  The  displays  are  nicely 
formatted;  the  programs  are  fast.  Best 
of  all,  the  products,  both  applications 
and  utilities,  are  useful. 

The  first  program  run  was  Check¬ 
book  II  because  I  expected  to  be  able  to 
dispense  with  it  rather  quickly.  Past 
checkbook  programs  I’ve  used  seemed 
to  concentrate  on  cutesy  graphics  to 
represent  checks.  Some  were  more 
trouble  than  balancing  a  checkbook  by 
hand.  The  TBS  program  was  a  wel¬ 
comed  change. 

Requiring  16K  or  more,  this  pro¬ 
gram  does  everything  necessary  to  keep 
your  checkbook  balanced  and  then 
some.  No  cutesy  graphics  here,  just  a 
simple,  professional  screen  format 
that’s  easy  to  understand. 

You  initiate  the  program  by  typing  1 
from  the  menu  to  input  checks  from  the 
keyboard.  Each  of  the  columns  of 
information  (check  number,  date,  to 
whom,  amount  and  code)  have  little 
blocks  lighted  to  show  you  the  amount 
of  information  required.  A  check  num¬ 
ber  can  be  up  to  five  digits.  Dates  are 
automatically  formatted  into  the  form 
MM/DD/YY.  If  you  enter  52871,  the 
screen  displays  the  entry  as  5/28/71. 
There  are  16  character  spaces  for  the 
payee  to  whom  you  can  make  checks 
out  up  to  $  1 ,000,000.  The  last  entry  for 
each  check  is  a  four-character  code  of 
your  choice.  The  codes  come  in  handy 
when  you  use  the  Search  and  Total  rou¬ 
tine. 

When  all  the  checks  are  entered,  type 
99999  as  the  next  check  number  and  the 
computer  automatically  sorts  the 
checks  by  number  and  returns  to  the 
menu. 

Typing  2  from  the  menu  brings  the 
List  and  Edit  function  to  the  display. 
Eleven  checks  at  a  time  are  shown  and 
an  Enter  shows  the  next  eleven.  Each  of 


the  five  pieces  of  information  per  check 
may  be  altered  with  the  Edit  function. 
Tapping  the  “D”  key  followed  by  a 
check  number  removes  the  check  from 
the  file. 

The  real  power  of  this  program, 
however,  comes  not  from  check  entry 
and  display,  but  in  the  options  of  Print 
with  Balance,  Search  and  Total,  Rec¬ 
oncile,  Sort,  and  Check  File  Length. 
You  also  have  available  Input  from 
Disk,  Output  to  Tape,  Output  to  Disk, 
Clear  and  Kill. 

To  use  the  Print  with  Balance  option, 
you  must  enter  the  balance  brought  for¬ 
ward.  After  the  first  time,  however, 
you  will  not  need  to  enter  the  data  again 
because  the  balance  is  protected  and 
recorded  in  your  data  files. 

Search  and  Total,  my  favorite  op¬ 
tion,  enables  you  to  pull  out  a  check  or 
series  of  checks  that  have  any  field 
(except  amount)  in  common.  The  func¬ 
tion  lists  those  checks  and  gives  a  total. 
It’s  an  effective  way  to  see  just 
what  you’re  spending  on  any  particular 
category. 

Checking  the  status  of  your  file  is 
simple  with  the  File  Length  option. 
After  typing  9  from  the  menu,  you  are 
shown  how  many  checks  and  deposits 
are  in  memory  and  how  many  more  you 
can  enter.  The  maximum  number  of 
checks  for  a  16K  machine  is  75;  for 
32K,  350;  and  for  32K  with  DOS,  150. 

Reconcile  is  the  last  operation  you 
should  make  during  a  session.  After 
following  the  prompts,  one  of  two 
things  will  happen.  You  will  either  get 
an  error  message  that  tells  you  the 
amount  of  the  error  or  you  will  get  a 
message  saying,  “Checkbook  Bal¬ 
ances.” 

There’s  more  to  this  program  but 
experimenting  on  your  own  will  be  fun 
and  productive. 

TBS’s  Information  System,  also  de¬ 
signed  for  a  machine  with  at  least  16K, 
is  basically  an  operator  programmable, 
in-memory  data  base  manager.  Up  to 
10  fields  are  allowed  with  up  to  40 

characters  per  field  to  a  total  of  200 
characters  per  record.  The  number  of 
records  held  in  memory  depends  on  the 


number  of  fields  you  create,  the  field 
lengths  and  the  amount  of  memory  your 
computer  has. 

Once  you  have  your  data  base  estab¬ 
lished  you  can  sort  it  by  any  field  with  a 
high-speed  machine  language  sort. 
When  the  sort  is  complete,  the  program 
returns  to  the  menu.  Typing  5  (Video 
Display)  lists  the  records  sorted  by  the 
selected  field.  The  sort  routine  is  fast — 
and  I  do  mean  fast. 

The  complete  menu  (just  to  show 
you  how  many  options  you  have)  is: 
Add,  Edit,  Sort,  Search,  Video  Dis¬ 
play,  Print,  Read  Data  File,  Write  Data 
File,  Initialize  New  Data  File  and  End. 
All  of  the  functions  are  easy  to  use  with 
prompts  from  the  program. 

The  high  quality  of  the  programming 
in  general  shows  up  throughout  the  pro¬ 
gram.  For  instance,  hitting  the  Add 
function  from  the  menu  shows  you 
what  each  record  looks  like,  the  total 
number  of  records  your  system  will 
hold  and  the  number  of  active  records 
you  have.  Flashing  blocks  indicate 
where  the  information  will  be  going  in  a 
record.  The  lengths  of  the  fields  are 
displayed  also.  You  can  not  only  sort, 
but  can  perform  sorts  within  sorts. 

For  those  of  you  with  printers,  there 
are  two  printing  modes  in  the  program. 
The  first,  a  “screen  print,”  automat¬ 
ically  moves  information  from  the  dis¬ 
play  to  the  printer.  The  second  is  a  more 
formal  module  accessed  from  the 
menu.  It  allows  you  to  create  printouts 
of  the  information  on  file  in  a  format 
you  desire.  You  can  create  mailing 
labels,  Rolodex  cards,  index  cards  or 
just  about  anything  else  you  wish. 

With  Information  System,  rewriting 
past  filing  programs  or  altering  them  to 
contain  new  fields  is  a  thing  of  the  past. 
When  I  want  to  file  something  now,  I 
set  up  a  new  file  using  Information  Sys¬ 
tem  and  I  have  whatever  fields  I  desire. 

An  added  benefit,  one  not  directly 
the  result  of  the  program  itself,  is  the 
information  contained  in  the  program 
documentation.  The  documentation 
has  one  of  the  most  lucid,  most  easily 
understood  explanation  of  fields, 
records  and  files  I’ve  run  into. 
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PRODUCT  CLOSE-UP 


The  next  program  I  looked  at  was 
Basic  Toolkit.  It’s  a  programmer’s  de¬ 
light.  For  me,  the  Variables  Map  alone 
is  worth  the  cost  of  the  program. 

I  can  still  recall  the  day  I  added  a 
subroutine  to  a  previously  written  pro¬ 
gram.  The  original  program  was  so 
long  I  had  deleted  the  REM  statements 
explaining  the  variables  so  I  could  get  it 
into  16K.  The  program  appeared  to 
work  Fine  in  its  modified  form  until  the 
first  time  I  called  the  subroutine.  I 
couldn’t  believe  the  numbers  on  the 
display.  I  knew  a  bug  had  to  be  in  the 
new  subroutine.  The  problem  was 
traced  to  a  variable  I  had  already  used. 
That  was  the  easy  part.  To  avoid  the 
same  problem  in  the  future,  I  had  to  list 
the  program  and  hand-write  each  vari¬ 
able  name  as  I  came  to  it. 

Those  were  the  bad  old  days.  I  put 
that  same  program  into  my  machine 
and  used  the  Basic  Toolkit  on  it.  The 
display  filled  with  an  alphabetical  list¬ 
ing  of  each  variable  used,  a  list  of  the 
lines  the  variable  appears  on  and  the 
number  of  times  it  appears  on  the  line. 

Merge  is  another  option  I  was  partic¬ 
ularly  pleased  with.  The  function  al¬ 
lows  you  to  load  multiple  programs  into 
your  machine,  concatenate  programs 
and/or  subroutines  or  execute  one  pro¬ 
gram  while  protecting  an  earlier  one.  If 
you  have  a  favorite  subroutine  for  sort¬ 
ing,  you  can  keep  it  on  a  separate  tape 
and  add  it  to  another  program  you’ve 
written;  all  you  do  is  merge  the  two. 
Other  menu  options: 

•GOTO  XREF  examines  the  current 
BASIC  program  and  lists  in  numerical 
sequence  the  destination  of  each  GOTO 
and  GOSUB  statement  and  the  line 
number  it  appears  on 

•RECALL  allows  you  to  recall  a 
BASIC  program  after  you  hit  Reset, 
erroneously  type  NEW  or  go  to  the  DOS 
•SEARCH  MEMORY,  an  aid  to  as¬ 
sembly  language  programmers,  looks 
for  every  occurrence  of  a  two-byte 
combination  and  lists  the  location 
where  it  occurs 

•TEST  MEMORY  checks  your 
computer  memory  to  determine  if  every 
location  is  operable 

Basic  Toolkit  resides  in  memory 
while  you  are  programming  and  can  be 
accessed  by  hitting  Shift/Break.  A 
valuable  aid  to  anyone  who  writes  pro¬ 
grams  in  BASIC,  the  Toolkit  works  with 
both  disk-  and  cassette-based  machines 
of  16,  32  or  48K. 


I  saved  Systems  Doctor  for  last  be¬ 
cause  I  have  always  felt  uncomfortable 
with  the  hardware  aspect  of  my  com¬ 
puter.  I  could  understand  the  theory  of 
how  and  why  it  worked,  but  all  those 
little  square  things  inside  the  keyboard 
and  the  myriad  of  silver  tracings  intimi¬ 
dated  me.  If  I  had  problems  with  my 
machine,  I  was  at  the  mercy  of  the 
repair  centers. 

No  more!  Systems  Doctor  does  a 
diagnostic  check  on  the  components  of 
your  computer  system.  SD  lets  you 
know  if  something  is  wrong  before  you 
program  or  enter  data.  With  this  pro¬ 
gram,  you  have  some  idea  where  a 
problem  lies  before  going  to  the  repair 
shop. 

The  main  menu  offers  the  options  of 
full  automatic  test,  full  monitored  test, 
selective  tests,  12-hour  central  unit  test 
and  disk  head  cleaner. 

The  menu  for  the  selective  tests  is 
extensive.  The  program  checks  your 
ROM,  the  RAM  (six  different  ways), 
the  video  memory  and  display,  and  the 
printer  functions. 

If  you  don’t  have  the  time  to  sit  and 


run  through  the  tests,  no  problem;  the 
Automatic  Test  mode  can  test  your 
machine  out  for  you  with  no  one  in 
attendance.  It  can  then  record  the  re¬ 
sults  to  a  line  printer,  disk  drive,  cas¬ 
sette  or  video  display. 

The  Full  Monitor  Test  is  designed  for 
those  who  wish  to  attend  the  machine 
while  the  program  performs  all  the 
functions  in  a  logical  sequence.  The 
Selective  Tests  allow  you  to  perform 
any  one  of  the  tests  designated  on  the 
testing  menu.  The  Twelve  Hour  Test 
goes  through  the  automatic  sequence 
three  times  and  records  the  results  to 
cassette  or  disk. 

All  in  all,  the  TBS  packages  are 
some  of  the  finest  I’ve  run  on  my  ma¬ 
chine.  I  feel  it’s  software  like  this  that 
turns  my  TRS-80  from  a  rather  expen¬ 
sive  hobby  or  toy  into  a  functional  tool 
with  a  lot  of  power  and  versatility. 

Prices  for  the  programs  are:  Check¬ 
book  II,  $18.50;  Information  System, 
$24,50;  Basic  Toolkit,  $19.80;  and 
System  Doctor,  $28.50.  Contact  The 
Bottom  Shelf,  Inc.,  P.O.  Box  49104, 
Atlanta,  GA  30357;  (409)  491-7567. 
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THE  LEADER  IN  QUALITY  SOFTWARE 
announces 
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SUPER-TEXT  is  a  professional  word  processing  system 
for  the  Apple  II  computer. 

SUPER-TEXT  is  the  most  innovative  word  processor 
available  on  any  personal  microcomputer  and  includes 
features  previously  found  only  on  word  processing  systems 
costing  thousands  more!  An  advanced  multiple  paging 
system  allows  you  to  view  two  text  screens  simultaneously. 
You  may  keep  notes  or  instructions  on  one  text  screen 
while  you  edit  on  the  other. 

SUPER-TEXT  is  a  character  oriented  editor  with  complete 
cursor  controls  to  easily  move  the  cursor  to  any  position 
in  the  text  with  a  minimum  of  keystrokes.  Built  in  floating 
point  math  and  automatic  tabbing  facilitate  the  preparation 
of  all  manual  reports  including  financial  reports,  insurance 
forms,  real  estate  settlements  and  more. 

SUPER-TEXTis  easier  to  operate  than  a  typewriter 
yet  challenges  the  flexibility  of  pencil  and  paper  '48k)  $99  95 
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THE  BEST  OF  MUSElm 

A  collection  of 

five  popular  cassette  games  on  diskette. 
Includes  the  Maze  Game,  Escape,  Tank  War, 
Music  Box  and  Side  Shows  for  the  Apple  II. 
(32k)  a  64.75  value  for  only  39.95 


Available  irom  dealers  or  write  today  to  the 
MUSE  CO., 71 12  Darlington  Drive.  Baltimore.  MD21234 
Order  by  Dhone  <301 1661-8531  MASTERCHARGE  and  VISA  welcome 


VISA* 
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WHAT’S  COMING  IIP 


SYSTEMS 


Pocket-Sized  Computer 

Nixdorf  Computer  enters  the  market  of  portable  computers 
with  the  LK  3000.  The  pocket-sized  computer  offers  a  range 
of  personal  and  business  capabilities.  It  can  be  programmed 
for  use  as  a  personal  date  book  or  telephone  directory,  or,  in  a 
business  environment,  it  can  function  as  a  mini-terminal  or 
data  collection  system  capable  of  communication  with  other 
data  processing  systems  via  data  communications  interfaces. 


The  LK  3000  has  application  modules  for  use  as  a  hand¬ 
held  language  dictionary  to  translate  German,  English, 
French,  Greek,  Italian,  Spanish,  Polish  and  Swedish  words 
and  idioms.  The  program  library  for  the  LK  3000  includes 
personal  information  modules  and  personal  programming 
modules. 

The  LK  3000  has  a  suggested  retail  price  of  $140  with 
modules  ranging  from  $35  to  $150.  For  more  information 
contact  Nixdorf  Computer  Corporation,  168  Middlesex 
Tpke.,  Burlington,  MA  01803;  (617)  273-0480. 

Circle  No.  101 


Computer-Based  Toll-Free  Answering  Service 

Voicegram,  a  nationwide  toll-free  computer-based  an¬ 
swering  service,  is  available  to  subscribers  of  The  Source. 
Businessmen  and  others  can  send  or  receive  electronic  mail 
messages  when  a  terminal  is  not  available.  You  can  dial  a 
toll-free  number  anywhere  in  the  continental  U.S.  and  dictate 
messages  by  telephone.  Messages  can  be  retrieved  from  any 
terminal,  communicating  word  processor  or  personal  com¬ 
puter  in  the  office  or  home,  using  a  nationwide  communi¬ 
cations  network.  Subscribers  can  also  call  in  to  receive 
Voicegram  messages  sent  to  them. 

Voicegram  messages  can  be  up  to  100  words  long  and  can 
be  sent  Monday  through  Friday,  9  a.m.  to  9  p.m.  Voice- 
grams  are  entered  into  the  computer  and  forwarded  to 
addresses  within  an  average  of  15  minutes.  The  charge  for 
each  message  is  $1.25  plus  regular  connect  time  charges  of 
five  cents  a  minute  (25  cents  before  6  p.m.).  For  multiple 
addresses,  the  charge  is  75  cents  for  each  additional  address. 


The  Source  is  a  computer-based  electronic  message  and 
information  system.  It  allows  you  to  send  messages  over 
computer  terminals  via  a  nationwide  packet  switching  net¬ 
work. 

Users  of  The  Source  also  have  access  to  the  UPI  newswire, 
stockmarket  and  business  news.  New  York  Times  consumer 
data  base  and  daily  news  summary,  educational  programs, 
financial  planning,  and  travel  and  discount  shopping 
services. 

To  use  The  Source,  subscribers  need  a  personal  computer 
or  terminal.  The  cost  of  the  service  is  $100  initial  registration 
fee  plus  $2.75  an  hour  ($15  an  hour  during  business  hours). 
For  more  information  contact  Telecomputing  Corporation  of 
America,  1616  Anderson  Road,  McLean,  Virginia  22102; 
(703)821-6660.  Circle  No.  102 


Executive  Setting  for  TRS-80 

ProData,  Inc.  announced  an  executive  model  computer 
package  including  a  custom  designed  teak  rolltop  desk. 

Two  versions  are  available,  each  built  around  the  TRS-80 
microcomputer.  Companion  I  has  16K  memory,  a  video 
monitor  and  keyboard,  a  single  mini-floppy  drive,  a  cassette 
recorder  and  an  electrostatic  printer.  Companion  II  sub¬ 
stitutes  an  impact  dot  matrix  printer  and  adds  a  second 
mini-floppy  and  an  additional  16K  of  memory.  A  library  of 
books,  manuals,  programs,  supplies,  (paper,  diskettes  and 
cassettes)  and  step  by  step  instructions  are  included. 

Computer  components  are  encased  in  the  desk  with  stor¬ 
age  for  accessories  and  room  for  expansion.  Sources  for 
additional  equipment  are  also  provided.  Maintenance  of  all 
computer  components  is  available  from  Radio  Shack’s 
national  network  of  service  centers. 

Planned  for  the  executive  who  doesn’t  have  the  time  or 
inclination  to  assemble  a  variety  of  components,  the  package 
is  designed  to  be  complete  and  ready  to  operate. 

These  packages  are  priced  At  $3495  and  $4995  FOB  Fort 
Worth,  TX,  and  are  ready  for  immediate  delivery.  A  50% 
deposit  reserves  a  place  in  the  first  run  delivery.  For  more 
information  contact  ProData,  Inc.,  98-1 122  Kahapili  Street, 
Aiea,  HI  96701;  (808)  488-7104.  Circle  No.  103 


WHAT’S  COMING  UP 


PERIPHERALS 


Unit  Converts  Typewriter  to  Printer 

A  device  designed  to  convert  typewriters  into  economic 
printers  is  offered  by  Applied  Computer  Systems,  Inc. 

The  new  system,  the  Robotype  Model  2100,  connects  to 
any  computer  to  obtain  a  printer  for  business,  educational  or 
home  applications. 

The  unit  can  use  a  parallel  interface  (Centronics  compati¬ 
ble),  RS-232-C  serial  (with  or  without  modems),  20MA 
current  loop  or  TTL.  The  RS-232-C  serial  interface  has  1 10, 
134.5  or  150  switch  selectable  baud  rates.  Faster  rates  are 
available  with  a  buffer  option. 

Robotype  accomodates  a  variety  of  typewriter  models 
including  the  IBM  Selectric,  Remmington  Rand,  Olympia 
and  Facit.  The  unit,  attached  to  a  typewriter  in  a  matter  of 
minutes  with  no  modifications  to  the  typewriter,  is  placed 
over  the  keys  of  the  typewriter.  Plungers  rest  on  the  keys  and 
depress  the  keys  on  command  from  computer  input. 


Robotype  comes  with  all  mechanical  and  electronic  cir¬ 
cuitry.  The  unit  is  housed  in  a  fiberglass  cover  and  types  at 
the  maximum  speed  of  the  typewriter  in  use. 

Several  options  enhance  the  capabilities  of  the  Robotype, 
the  company  said.  If  a  keyboad  is  added,  the  unit  becomes  an 
input/output  terminal.  Through  the  serial  interface,  Robo¬ 
type  can  communicate  with  any  computer,  remotely  or  local¬ 
ly,  and  the  addition  of  a  microprocessor  allows  the  unit  to 
stand  alone  as  a  computer  system  with  a  working  space  of 
2000  characters  to  program  in  integer  BASIC. 

The  Robotype,  covered  by  two  patents,  is  warranted  for 
parts  and  labor.  The  unit  is  available  from  stock  to  30  days  for 
under  $1000.  For  more  information  contact  Applied  Com¬ 
puter  Systems,  Inc.,  77  E.  Wilson  Bridge  Rd.,  Worthington, 
OH  43085.  Circle  No.  104 


Low-Cost  Printer  for  Pet 

Digiclocks  is  offering  a  low-cost  microprinter  for  the  Pet. 
The  Microprinter  100  does  the  entire  Pet  screen  character  set 
in  both  positive  and  negative  writing.  The  unit  is  supplied 


complete  and  ready  to  operate  with  the  Pet;  no  extras  are 
required.  It  is  small,  reliable  and  addressable,  the  company 
said. 

The  unit  is  available  at  an  introductory  price  of  $390.  For 
more  information  contact  Digiclocks,  3016  Oceanview, 
Orange,  CA  92665;  (714)  557-5252.  Circle  No.  105 


Music  System  for  the  Apple  II 

Micro  Music  Inc.  ’s  Micro  Composer,  an  Apple  II  compat¬ 
ible  music  system,  leads  you  through  entering,  displaying, 
editing  and  playing  music  with  up  to  four  voices  with  a  four 
octave  range. 

Micro  Composer  lets  you: 

•  See  all  four  voices  at  the  same  time  the  music  is  played. 

•  Enter  music  by  a  coding  system  which  keeps  track  of 
rhythmic  durations. 

•  Program  pitch,  rhythm  and  timbre.  Tempo  is  varied  by 
the  Apple  II  paddle. 

•  Choose  from  seven  different  tone  colors  for  each  voice, 
or  create  your  own  tone  color. 

•  Save  your  music  on  disk  or  cassette. 

Micro  Composer  comes  with  an  instruction  manual,  soft¬ 
ware  disk  (or  cassette)  and  a  Micro  Music  DAC  music  card. 
The  DAC  plugs  into  the  Apple  II  extension  slot  and  is 
connected  to  an  8  ohm  speaker. 

A  4-octave  range  consists  of  25  equal-tempered  chromatic 
steps.  Rhythmic  durations  are  whole,  half,  quarter,  eighth, 
sixteenth  and  thirty-second  notes  .and  their  dotted  values. 

Music  with  1,  2,  3  or  4  polyphonic  voices  may  be  entered 
in  vertical  sound  sets.  Each  set  contains  all  of  the  rhythm  and 
pitch  information  needed  during  that  time  unit.  With  4  voice 
music,  744  sets  may  be  stored  in  the  8K  memory  reserved  for 
music. 

Micro  Composer  has  7  pre-set  timbres:  rich  string,  wind- 
flute,  brass,  oboe-bassoon,  clarinet,  electronic  organ  and 
funky  oboe.  There  is  capability  for  constructing  and  saving 
your  own  timbres.  The  timbres  are  limited  to  16  harmonics 
and  restricted  to  timbres  below  5  KHz. 

The  music  system,  command  driven,  has  available  Play, 
Display  (and  play).  Compose,  Edit,  Fourier,  Voices,  Meter, 
Timbre,  Read,  Write,  Help  and  Quit.  Editing  is  possible  for 
any  set.  In  the  edit  mode,  the  stored  notation  set  is  displayed 
as  well  as  the  new  notation  being  entered.  The  button  on  the 


WHAT’S  COMING  IIP 


Apple  Paddle  #0  allows  music  to  be  stopped  or  started  at  any 
point.  The  display  mode  is  for  editing  and  is  not  recom¬ 
mended  for  performance  of  the  finished  work. 

With  the  Micro  Music  DAC  board  and  accompanying 
software,  four  simultaneous  tones  can  be  generated  using  a 
sampling  technique  and  waveform  tables  stored  in  memory. 

Memory  requirements  for  the  Apple  II  are  32k  for  a  cas¬ 
sette-based  system  and  48k  for  a  disk-based  system. 

Cost  of  the  Micro  Music  DAC,  software  and  manual  is 
$220.  For  more  information  contact  Micro  Music,  Inc.,  309 
W.  Beaufort,  Suite  8,  Normal,  IL  61761;  (309)452-6991. 
Circle  No.  106 


Printer  for  TRS-80 

Matchless  Systems  has  added  a  printer  to  its  line  of  TRS- 
80  related  products. 

The  80-column,  bidirectional,  5  x  7  dot  matrix  printer 
utilizes  a  print  mechanism  of  simple  design  and  high  reliabil¬ 
ity,  the  company  side.  The  print  head  has  a  life  of  100  million 
characters. 

Among  the  other  features  are  a  print  speed  of  125  cps  and  a 
throughput  print  speed  of  63  1pm.  The  adjustable  sprocket 
feed  mechanism  allows  use  of  forms  from  4-1/2"  to  9-1/2" 
wide,  with  loading  from  either  the  bottom  or  rear.  A  full  96 
ASCII  set  permits  printing  upper  and  lower  case  characters 
which  can  be  expanded  for  double-width  fonts  in  bold  face. 
A  Vertical  Format  Unit  provides  pre-programmed/ 
programmable  tab  positions,  top  of  form  and  bottom  of  form. 

In  addition  to  its  use  with  the  TRS-80,  the  printer’s  Cen¬ 
tronics-compatible  parallel  interface  makes  it  possible  to  use 
directly  with  other  computers  like  Apple,  Sorcerer  or  any 
standard  computer  with  parallel  interface. 

While  the  printer  sells  for  $777,  Matchless  has  a  special 
introductory  price  of  $749.  For  more  information  contact 
Matchless  Systems,  Dept.  3,  18444  South  Broadway,  Gar¬ 
dena,  CA  90248;  (213)  327-1010.  Circle  No.  143 


SOFTWARE 


Software  Turns  TRS-80  into  Printing  Calculator 

You  can  make  your  TRS-80  (Level  II,  16K)  into  a  printing 
calculator  with  Manhattan  Software’s  Calculator  Plus. 

The  program,  an  on-screen  calculator  if  you  don’t  have  a 
printer,  provides  chain  and  mixed  calculations  on  screen  with 
a  print  command  to  record  intermediate  steps,  if  desired,  and 
the  final  answer.  Entries  in  long  add-and-subtract  operations 
can  be  checked  with  an  on-screen  review  command,  or 
printed  out  for  verification  and  a  permanent  record.  The 
program  works  with  printers  down  to  Quick  Printer  II  size. 

Significant  figures  can  be  retained  in  a  separate  memory 
section,  with  titles  entered  by  the  user  for  identification. 
Memories  can  be  printed  out  as  a  table,  or  any  memory  can  be 
carried  to  a  calculation  mode  as  a  constant. 

An  optional  dollar  format  is  provided  both  on-screen  and 


in  printouts,  and  double-precision  is  used  throughout  for 
accuracy  of  calculations. 

The  program  is  priced  at  $9.95.  For  more  information 
contact  Manhattan  Software,  Inc.,  P.O.  Box  5200,  Grand 
Central  Station,  New  York,  NY  10017;  (212)427-4718. 
Circle  No.  107 


APL  for  the  8080/8085  and  Z-80 

Softronics’  APL,  an  interactive  general-purpose  program¬ 
ming  language,  is  available  for  8080,  8085  and  Z-80  micro¬ 
processors.  The  company  said  its  APL  has  most  of  the 
functions  and  operators  of  full  APL,  including  n-dimensional 
inner  and  outer  product,  reduction,  compression,  general 
transpose,  reversal,  take,  drop,  execute  and  format,  system 
functions  and  variables,  and  system  commands. 

APL  runs  under  the  CP/M  operating  system,  residing  in 
30K  bytes  of  memory.  It  is  “ready-to-go”  in  ASCII,  using 
CP/M  standard  I/O.  The  interpreter  runs  in  a  variety  of 
character  set  configurations.  In  addition  to  the  standard 
ASCII  mnemonic  representations,  it  supports  typewriter  and 
bit-pairing  ASCII- APL  character  sets.  It  can  run  with  user- 
supplied  I/O  drivers.  The  shared  variable  mechanism  allows 
CP/M  disk  I/O. 

Abrams’  descriptor  calculus  and  shared  data  storage  are 
optimization  techniques  employed  by  the  interpreter  to  save 
memory  space  and  execution  time.  Values  are  stored  inter¬ 
nally  in  a  variety  of  formats  for  efficient  memory  utilization. 

Softronics  APL,  which  comes  with  an  optional  driver 
program  for  video  display  with  programmable  character 
generator,  is  $350  for  CP/M  disk  and  manual.  New  Jersey 
residents  add  5%  sales  tax.  For  more  information  contact 
Softronics,  36  Homestead  Lane,  Roosevelt,  NJ  08555. 
Circle  No.  114 


Software  for  North  Star  Systems 

Generating  reports  or  preparing  for  a  real  estate  exam  with 
a  North  Star  System  is  possible  with  releases  from  Media 
2001. 

RPTGEN  is  an  applications  package  designed  to  render  up 
to  18  fields  of  data/comments  in  an  organized  report  com¬ 
plete  with  headings  and  sub-headings.  Each  field  can  be 
specified  to  a  particular  use.  Formats  already  in  use  include 
Property  Listings  —  Real  Estate;  Client  Data  —  Real  Estate; 
Mortgage  Loan  Applications  —  Financial  Institutions;  Client 
History  —  Medical,  Dental,  Psychiatric;  Product  Specifica¬ 
tions  —  Manufacturing;  Library  Summary  —  Reference. 

Many  other  uses  are  available  through  RPTGEN.  The  only 
limitation  for  applications  is  the  user’s  imagination,  the  com¬ 
pany  said.  Each  field  can  be  used  to  store  such  information  as 
name,  address,  telephone,  physical  attributes  and  descrip¬ 
tions,  account  status  or  comments. 

RPTGEN  offers  flexibility  in  handling  a  report.  The  follow¬ 
ing  sub-programs  are  standard  in  the  package:  Add,  Change, 
Delete,  Directory,  Printl,  Compact,  Initiate. 

Real  Estate,  a  self-study  program  of  twenty-one  seg- 


WHAT’S  COMING  UP 


mented  lessons  for  preparation  to  take  the  real  estate  agent’s/ 
broker’s  licensing  examination,  includes  real  estate  law, 
finance,  mathematics,  appraisal  techniques,  public  control 
and  miscellaneous  topics. 

Utilizing  a  computer  memory  core  of  dialogue,  each  les¬ 
son  allows  the  student  to  converse  directly  with  the  computer 
in  an  interactive  exchange. 

Each  question  reflects  actual  “exam”  situations  a  student 
encounters  when  applying  for  a  State  of  California  real  estate 
license.  Although  designed  for  the  California  examination, 
the  course  covers  essentially  all  major  areas  of  state  examina¬ 
tions  throughout  the  U.S.,  the  company  said. 

The  RPTGEN  system,  written  in  North  Star  BASIC  with 
versions  to  be  released  for  the  TRS-80,  Apple  and  Texas 
Instruments  systems,  retails  for  $399,  which  includes  cus¬ 
tomization  for  the  purchaser. 

Real  Estate  is  designed  to  run  in  North  Star  BASIC  with 
32K  of  RAM.  Versions  for  the  TRS-80,  Apple  and  Texas 
Instruments  systems  will  follow. 

The  study  program  retails  for  $299.  For  more  information 
contact  Media  2001,  P.O.  Box  614,  Corte  Madera,  CA 
94925;  (415)  924-53 1 1 .  Circle  No.  109 


Data  Base  Management  System 

SCDP’s  (Software  Consultation,  Design  and  Production) 
Vulcan  Data  Base  Management  system  has  38  English 
language-like  commands  to  manipulate  files,  records,  fields 
and  scratch-pad  variables.  Vulcan  is  an  8080  microcomputer 
implementation  of  a  user  oriented  system  used  in  industry 
and  educational  institutions.  Vulcan,  fully  operational,  has 
been  field  tested  for  over  eight  months,  the  company  said. 

Vulcan  is  written  in  8080  assembly  language  and  operates 
on  8080  or  Z-80  systems  under  CP/M  or  PTDOS.lt  requires  a 
minimum  36K  CP/M  and  one  or  two  disk  drives. 

Commands  include:  Sort,  Report,  Create,  Insert,  Append, 
Edit,  Delete,  Recall,  Goto,  Skip,  Save,  Store,  Accept,  Input, 
Set,  Wait,  If,  Return,  Cancel,  Copy,  Replace,  Locate,  Dis¬ 
play,  Do,  List,  Loop,  Use,  Count  and  Sum. 

Structured  data  records  can  be  selectively  chosen  for  pro¬ 
cessing  using  complex  Boolean,  string  or  mathematical  ex¬ 
pressions.  Functions  and  macro  substitutions  are  also  incor¬ 
porated.  Certain  commands  are  entered  directly.  Other  com¬ 
mands  initiate  a  dialogue  extract  additional  information. 

The  program  is  fault  tolerant.  Whenever  the  user  enters 
erroneous  input,  Vulcan  prompts  the  user  to  enter  corrections. 

Commands  can  be  executed  in  either  interactive  or  pro¬ 
gram  mode.  In  the  interactive  mode,  a  command  is  executed 
as  soon  as  it  is  entered.  In  the  program  mode,  commands  are 
entered  into  a  file  in  structured  form  and  then  executed  with  a 
single  input  statement. 

Vulcan  can  accept  or  store  data  in  standard  ASCII  files  to 
be  compatible  with  BASIC,  Fortran  and  Cobol. 

The  system  is  supplied  on  8  or  5  inch  (CP/M  format) 
diskettes  or  8  inch  PTDOS  diskette  with  manual  for  $490.  The 
manual  alone  is  $25.  For  more  information  contact  Software 
Consultation,  Design  and  Production,  6542  Greeley  St., 
Tujunga,  CA  91042;  (213)  352-7701.  CircleNo.  118 


EXPANDED  MAILLIST  SYSTEM 

By  Harry  Hopkins 

After  16  months  of  development  and  one  year  in  field  testinq  C.t.C.S.  now 
releases  the  most  complete  mailinq  list  system  available  for  the  TRS-80.  at  a 
special  low  introductory  price  of  $59.95.  The  system  requires  a  sinqle  disk  a 
32k  interface  and  a  printer. 

The  Expanded  Maillist  System  utilizes  an  exclusive  machine  lanquaqe  sort 
which  allows  for  the  sort  of  500  records  by  name,  state  or  zip  code  in  5  seconds! 
The  system  has  complete  error  trapping  and  recovery  such  as  automatically  savinq 
the  file  when  memory  space  is  full  and  remaininq  in  the  system  under  a  ‘file  not 
found’  condition.  The  system  also  has  multiple  file  and  reorganization  capabilities. 

The  following  fully  linked  proqrams  are  included  in  the  Expanded  Maillist 
System: 

1.  DUPLICATE  CHECKING — Checks  for  duplicates  as  you  enter  and  also  has 
a  separate  routine  that  will  purqe  an  entire  file  of  duplicate  names  with  a  sinqle 
command. 

2.  FILE  MAINTENANCE — Used  for  addinq  deletinq  and  complete  editinq 
of  your  mail  list  files. 

3.  LABEL  AND  LIST  PRINTING — Allows  selective  printinq  of  labels  or  lists 
on  up  to  a  ten  digit  key.  Also  has  full  suppression  capability.  For  example,  if 
you  want  a  list  of  everyone  in  your  file  with  a  JAN’  in  their  key  code  except 
those  with  an  '80'.  you  should  select  JAN’  and  suppress  '80'. 

4.  STATUS  ANALYSIS — This  program  will  generate  statistical  reports  on  the 
percentages  of  names  with  certain  keys  or  regional  breakdown.  Very  useful  for 
last  issue  notices  on  labels. 

5.  FILE  REORGANIZATION — With  this  program  you  may  reorganize  your 
files  into  specific  alpha  or  zip  code  ranqes  for  true  multi-file  capability. 

6.  MULTI-PURPOSE  LABEL  UTILITY — Provides  formatted  printinq  of  labels 
for  special  applications. 

Expanded  Maillist  System  on  diskette  with  manual  $59.95 
Manual  only  $3  with  full  credit  towards  purchase. 

AMCT-80 

By  Earl  Peterson 

This  automatic  morse  code  teacher  for  the  16k.  level  2  TRS-80  is  the  only 
morse  code  program  that  will  automatically  (at  your  option)  slow  down  or  speed 
up  depending  on  your  proficiency  to  receive  code.  It  includes  9  preprogrammed 
progressive  exercises.  Fully  variable  speed  up  to  30  w.p.m..  1-9  characters  per 
group  and  1-9  spaces  between  groups  are  user  selected  options.  The  send  mode 
allows  for  keyboard  entry  concurrent  to  sending  by  utilizing  a  256  byte  rinq 
buffer.  There  are  V  user  programmable  messaqes  of  64  characters  each. 

.This  machine  language  program  is  truly  the  morse  code  teacher  of  tomorrow 
today! 

AMCT-80  on  cassette  with  full  documentation  $14.95 
Dealer  inquiries  invited. 

COST  EFFECTIVE  COMPUTER  SERVICES 
1041  Ute —  P.O.  Box  3543  Grand  Junction,  CO  81502 
(303)  243-3629 
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From  Jits 
Tc  Eiis... 

A  personal  history  of 
the  electronic  computer 


This  long-awaited  saga  of  the  minds  in¬ 
volved  in  the  very  earliest  stages  of  com¬ 
puter  development  makes  for  great  histo¬ 
rical  reading  for  computer  buff  and  layman 
alike. 

$12.95  cloth 

from 

Robotics  Press 

P.O.  Box  92 

Forest  Grove.  Oregon  97116 

> 
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Music  on  the  Apple 

Hayden’s  Song  in  the  Key  of  Apple  by  Ira  Lopatin  allows 
your  Apple  II  to  play  music.  No  programming  background  is 
necessary. 

The  program  offers  many  choices.  You  can  play  The  Stars 
and  Stripes  Forever,  Wild  Horsemen,  Fanfare  from  William 
Tell  Overture,  or  a  song  you  have  previously  programmed 
and  saved  on  tape.  In  additon,  you  can  directly  input  and  play 
out  on  command  other  music  you  create.  Songs  may  be 
written  with  up  to  200  notes,  including  rests,  per  musical 
piece.  The  program  written  in  Integer  BASIC,  allows  a  two- 
octave  range,  playing  all  notes  including  sharps,  flats,  and 
rests.  Multicolor  graphics  accompany  all  music,  even  that 
which  you  create. 

The  program  sells  for  $10.95.  For  more  information  con¬ 
tact  Hayden  Book  Company,  Inc.,  50  Essex  St.,  Rochelle 
Park,  NJ  07662;  (20 1 )  843-0550  Circle  No.  11 1 


Apple  II  Utility  Routines 

IS  AM-DS  by  Decision  Systems  consists  of  an  integrated  set 
of  15  utility  routines  for  an  Apple  II  using  Applesoft.  The 
package  facilitates  the  creation  and  manipulation  of  indexed 
files. 

Utilizing  the  routines,  records  on  indexed  files  may  be 
retrieved  randomly  or  in  sequence.  Each  record  is  identified 
by  a  key  data  value.  The  key  values  do  not  have  to  be  part  of 
the  record;  they  do  not  have  to  be  unique  for  each  record;  and 
partial  key  values  may  be  used  in  retrieving  records. 

The  interface  between  ISAM-DS  and  an  Applesoft  program 
is  through  a  single  entry  point  (GOSUB)  and  nine  variables. 
Files  can  be  created,  opened,  closed,  copied  and  erased. 
Records  can  be  written,  read,  changed  and  deleted.  File 
space  that  is  freed  by  deleting  a  record  is  automatically 
reused  when  another  record  is  added.  There  is  never  a  need  to 
“clean  up”  a  file  because  of  update  activity. 

The  ISAM-DS  package  includes  the  set  of  routines,  docu¬ 
mentation  for  the  routines  and  a  mailing  list  program  that 
demonstrates  ISAM-DS  capabilities.  Append  routines  for 
DOS  3. 1  and  3.2  are  also  included.  The  append  routines  are 
used  to  join  the  ISAM-DS  package  to  an  Applesoft  program. 
Cost  of  the  package,  which  requires  Disk  II  is  $50.  For  more 
information  contact  Decision  System,  P.O.  Box  13006, 
Denton,  TX  76203;  (817)  382-6353.  Circle  No.  1 13 


Sports  Packages  for  Apple  II,  TRS-80 

NSP,  Inc.,  offers  two  software  packages  for  sports  enthu¬ 
siasts:  one  computes  and  records  golf  scores  and  handicaps; 
the  other  is  an  interactive  computer  bowling  game.  Both 
packages  are  designed  for  the  TRS-80  and  Apple  II. 

Gold  Handicap  System  uses  standard  USGA  handicap 
formulas  based  on  the  proper  number  of  lowest  scores.  The 
program  retains  the  most  recent  20  scores  per  player  and 
retains  the  individual  course  rating. 

The  package  displays  and  prints  player  names,  scores  and 
handicaps.  You  can  delete  players,  correct  names  and/or 


scores,  add  new  scores  to  existing  scores,  reject  unreason¬ 
able  scores  and  sort  by  player  name. 

Golf  Handicap  System  handles  180  players  on  a  16K  Level 
II  TRS-80  or  500  names  on  a  32K  Apple  II  with  Integer 
Basic.  The  TRS-80  version  is  expandable  to  500  names  with 
additional  memory. 

With  Computer  Bowling,  a  player  may  play  a  single  game 
or  two  players  may  compete.  Players,  identified  by  name, 
can  select  duckpins  or  tenpins. 

The  game  features  left-  or  right-hand,  straight  or  curved, 
fast  or  slow  ball  deliveries;  running  displays  of  scores  and 
marks;  realistic  pin  display;  random  break  selections  dictated 
by  the  ball’s  contact  with  a  pin;  and  random  ball  path  bias  to 
make  every  game  and  every  ball  delivery  different. 

The  Apple  II  version,  which  executes  from  diskette  or 
cassette,  offers  noise-accented  pin  action. 

Golf  Handicap  System  consists  of  two  programs  on  a 
single  cassette  for  $85  and  will  execute  from  cassette  or 
Apple  diskette.  Computer  Bowling  is  priced  at  $9.95.  For 
more  information  contact  NSP,  Inc.,  P.O.  Box  3092, 
Crofton,  MD  21 1 14;  (301)721-3849.  Circle  No.  117 


Explore  Dungeons  with  TRS-80 

Software  Exchange  announced  Dungeon  Explorer,  an  ad¬ 
venture  game  for  the  16K  TRS-80  Level  II  computer. 

Dungeon  Explorer  is  a  single  player  game  of  combat  and 
adventure,  based  upon  Dungeons  and  Dragons.  Deep  under¬ 
ground  in  the  Dungeon  of  Xanadu,  there  are  incredible 
treasures.  But  these  treasures  are  guarded  by  vicious  mon¬ 
sters.  The  object  is  to  survive  the  dangers  and  become  a 
legendary  super-hero.  Each  trip  into  the  dungeon  is  different. 
The  game  can  last  for  hours,  the  company  said. 

Dungeon  Explorer  is  available  for  $8.50  including  cassette 
tape  and  instructions.  For  more  information  contact  Software 
Exchange,  2681  Peterboro,  W.  Bloomfield,  MI  48033. 
Circle  No.  125 


Subroutines  in  North  Star  BASIC 

HELPB5  is  a  collection  of  subroutines  in  North  Star  BASIC 
which  use  dynamic  memory  assignment  to  do  list  processing. 
Available  subroutines  include  Create,  Destroy,  File  First, 
File  Last,  File  Ranked,  Remove  First,  Remove  Last  and 
Remove,  plus  additional  debugging  subroutines. 

You  can  create  sequential  sets  of  array  elements  which 
describe  objects.  By  filing  sets  on  and  removing  sets  from 
various  lists,  complex  processes  can  be  simulated.  Object 
sizes  and  number  of  lists,  set  by  the  user,  is  limited  only  by 
available  core. 

File  First  and  File  Last  place  an  entity  first  or  last  on  a  list; 
File  Ranked  places  an  entity  on  a  sorted  list  based  on  the 
value  of  a  selected  array  element.  Remove  First,  Remove 
Last  and  Remove  perform  the  opposite  functions.  The  de¬ 
bugging  routines  allow  you  to  print  all  the  objects  on  a  list, 
determine  if  a  particular  object  is  on  a  specified  list,  if  an 
array  element  has  a  specified  value  and  print  the  array  ele¬ 
ments  for  a  particular  entity. 


WHAT’S  COMING  IIP 


HELPB5  needs  a  minimum  of  32K  RAM.  A  user’s  manual 
and  sample  simulation  program  are  provided.  The  price  is 
$48.  For  more  information  contact  American  Planning 
Corp. ,  4600  Duke  Street,  Suite  425,  Alexandria,  VA  22304; 
(703)751-2574.  Circle  No.  126 


Art  and  Math  for  Imagination  Machine 

Two  new  cassettes  from  APF  Electronics  turn  the  Imagi¬ 
nation  Machine  into  an  artist’s  tool  or  math  tutor. 

Artist  and  Easel  lets  you  be  a  creative  artist  as  The  Imagi¬ 
nation  Machine  becomes  a  paint  brush,  palette  and  designing 
pen  to  draw,  doodle  and  play.  Cassette  storage  lets  the  artist 
bring  back  past  creations  on  cassette  tape. 

APF  calls  the  Artist  and  Easel  cassette  an  educational 
game  which  teaches  children  shapes,  sizes,  dimensions  and 
color  perception,  while  they  play  and  develop  cartoons  and  a 
variety  of  computer  configurations. 

Math  Tutor  performs  like  a  private  tutor  as  it  directs  you  on 
the  basis  of  ability  and  learning  speed. 

As  you  begin  to  use  the  math  cassette.  The  Imagination 
Machine  automatically  determines  the  level  of  ease  or  diffi¬ 
culty  you  are  at.  By  varying  problems  and  arithmetic  ques¬ 
tions,  Math  Tutor  makes  it  fun  and  easy  for  you  to  gain 
speed,  knowledge  and  dexterity  in  math,  the  company  said. 

If  you  do  well  at  one  level  in  the  program,  the  Personal 
Performance  Response  feature  offers  more  challenging  prob¬ 
lems  to  develop  skills.  If  additional  reinforcement  is  needed, 
the  computer  compensates  with  easier  problems  until  you  are 
ready  to  try  more  difficult  concepts. 

Artist  and  Easel  and  Math  Tutor  sell  for  $29.95  each.  For 
more  information  contact  APF  Electronics  Inc.,  444  Madi¬ 
son  Ave.,  New  York,  NY  10022;  (212)  758-7550. 

Circle  No.  122 


Application  Packages  for  Pet 

Three  software  packages  from  Total  Information  Services 
provide  practical  applications  for  your  Pet  at  home  and  at 
your  business. 

A  Checkbook  Program  has  checkbook  and  budget  applica¬ 
tions.  It  assists  in  balancing  a  checkbook;  selects  and 
displays  checks  by  person,  purpose,  or  date;  and  sums  checks 
by  category  or  person.  An  Accounts  Program  allows  you  to 
create  a  data  base  for  company  names,  addresses,  invoice 
and  purchase  order  numbers,  and  amounts  of  purchase.  It 
locates  information  on  specific  companies,  determines 
amounts  owed  and  displays  past-due  accounts.  The  Calendar 
Program  keeps  track  of  appointments  in  an  office  or  your 
schedule  of  social  engagements.  It  is  an  all-purpose  datebook 
complete  with  events,  dates,  times  and  notes.  TIS  also  offers 
a  Mailing  List  Program  and  a  Micro  Text  Editor. 

All  software  packages  include  a  cassette  copy  of  the  source 
program,  a  source  listing  and  an  instructions  manual. 

Each  of  the  five  TIS  software  packages  costs  $9.90  for  the 
cassette  version  or  $12.95  for  disk  version.  For  more  in¬ 
formation  contact  Total  Information  Services,  Box  921 ,  Los 
Alamos,  NM  87544;  (505)  455-7049.  Circle  No.  121 


- - ) 

Ssisima  Fntion 


Turn  your  daydreams  and  visions  of  the 
future  into  cash.  We're  looking  for  short 
(500  to  2000  words)  science  fiction  stories 
dealing  with  the  future  of  microcomputers  - 
their  possible  uses  and  their  roles  in  society 
and  in  people’s  lives.  Stories  must  be  ori¬ 
ginal  and  not  published  elsewhere.  Submit 
your  typed,  double-spaced  manuscript  to 
Personal  Computing,  1050  Commonwealth 
Ave.,  Boston,  MA  02215. 


Share  Your 
Home  Programs 

How  do  you  use  your  computer  at  home?  Family 
finances?  Budgets?  Meal  planning?  Entertainment? 
Teaching  the  kids?  Word  processing?  Home  security? 
Investment  planning  ?  Helping  with  your  other  hobby? 

Our  readers  are  as  software-hungry  as  you.  So  why  not 
share  the  home  applications  programs  you’ve  developed? 
Send  us  an  article  describing  your  application  and  the 
program  you  wrote  to  implement  it.  Be  sure  to  include  a 
program  listing  and  sample  run. 

Remember,  readers  aren’t  familiar  with  your  program. 
So  explain  in  detail  what  the  program  does  and  how  it  does 
it.  Include  here  the  overall  structure  of  your  program  as 
well  as  any  special  algorithms  or  routines  you’ve  used. 
Give  suggestions  for  modifying  or  expanding  the  program 
for  other  applications  or  other  situations. 

All  submissions  should  be  original,  typed  (not  all 
CAPS),  double-spaced  and  neat.  Include  your  name  and 
address  on  the  first  page  of  the  article  and  enclose  a 
self-addressed,  stamped  envelope  for  return  of  material. 
Also,  please  use  a  fresh  ribbon  on  our  printer  for  program 
listings  and  sample  runs. 

Feel  free  to  call  us  at  (617)  232-5470  if  you  have  any 
questions  or  want  to  discuss  specific  article  ideas. 

Mail  your  manuscript  to:  Editor 

Personal  Computing 
1050  Commonwealth  Ave. 
Boston,  MA  02215 
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CP/M  Software  Systems 

H  &  H  Associates,  Inc. ,  markets  eleven  software  packages 
for  systems  operating  under  CP/M.  Hardware  and  software 
requirements  for  the  packages  include  a  minimum  of  32K 
memory,  CBASIC/CRUN  Version  1 ,  QSORT,  two  disk  drives 
and  a  132-column  printer. 

According  to  the  company,  all  the  systems  are  easily 
modified.  Code  is  structured  and  all  control  information  is 
maintained  in  a  common  file.  Some  of  the  control  informa¬ 
tion  common  to  most  packages  are  clear  screen  command, 
current  computer  date,  printer  form  feed  commands,  files 
names,  record  lengths,  user  name  and  system  name,  and 
version. 

All  record  layouts  are  defined  in  a  common  source  code 
member  and  each  program  utilizing  the  file  copies  the  ap¬ 
propriate  member,  eliminating  the  need  to  change  every 
program  that  accesses  the  file  when  changes  to  record  layout 
are  made. 

Error  messages  include  a  unique  number  which  may  be 
used  to  find  a  complete  error  message  description  and  valid 
responses  and/or  actions  in  an  error  message  index. 

All  systems  are  supplied  with  a  user’s  manual  and  source 
code  in  printed  format.  Source  code  is  provided  on  one  or 
more  single  density  8-inch  CP/M  diskettes  for  an  additional 
charge  of  $50.  All  orders  must  be  accompanied  by  check  or 
money  order  and  are  shipped  by  UPS  within  the  U.S. 

Packages  available  are  Accounts  Receivable,  $200; 
Apartment  Management,  $200;  Client  Write  Up,  $100;  Law 
Office  Billing  $200;  Order  Entry,  $200;  Medical  Office 
Billing,  $200;  Categorical  Information  System,  $100;  Pay¬ 
roll,  $100;  Statistical  Analysis,  $150;  Inventory,  $200;  and 
Automated  Forms  Control  System,  $75. 

For  more  information  contact  H  &  H  Associates,  Inc., 
P.O.  Box  2663,  Renton,  WA,  98055.  Circle  No.  115 


Income  Property  Management  Software 

A-T  Enterprises  announced  software  designed  for  the 
broker/property  manager  and  the  professional  property 
manager.  The  system  provides  management  and  accounting 
control  for  income  properties  including  apartments,  condo¬ 
miniums,  houses,  mini- warehouses,  mobile  home  parks, 
office  buildings  and  shopping  centers. 

The  software  keeps  track  of  all  income  and  expenses, 
generating  management  statements,  reports  and  exception 
reports  necessary  to  control  and  manage  income  properties, 
the  company  said.  The  chart  of  accounts  and  operating 
statement  (profit  and  loss)  can  be  customized  to  duplicate 
your  current  method  of  doing  business. 

Operating  statements  shows  month  and  year  to  date  in¬ 
come  and  expenses  with  a  percentage  comparison  of  ex¬ 
penses  to  income.  Budgeting,  list  of  tenants,  delinquency 
reports  and  vendor  information  with  year  to  date  payments 
are  also  incuded.  The  system  can  handle  partial,  late  charges, 
over  and  advance  payments.  A  complete  audit  trail  is  pro¬ 
vided. 

The  system  is  interactive  with  prompting  questions  dis¬ 
played  on  the  CRT.  All  information  from  the  system  can  first 


be  viewed  on  the  screen  and  then  printed  at  your  option. 

Property  Management  also  includes  business  and  real 
estate  related  programs  like  income  property  analysis,  loan 
payments,  loan  amortization,  ballon  payments,  rate  of  return 
and  depreciation  schedules. 

The  software  operates  on  any  8080  orZ-80  microcomputer 
with  48K  of  memory,  dual  8"  diskette  drives,  a  CRT  and 
80-column  printer.  The  software,  written  in  CBASIC,  runs 
under  the  CP/M  operating  system.  The  approximate  capacity 
of  the  system  is  about  75  properties  and  1500  units. 

The  property  management  software  costs  $750.  A  de¬ 
monstration  diskette  with  manual  is  $95  and  can  later  be 
applied  toward  the  total  software  price.  Credit  cards  and 
COD  orders  are  accepted.  For  more  information  contact  A-T 
Enterprises,  221  No.  Lois  St.,  La  Habra,  CA  90631;  (213) 
947-2762.  Circle  No.  129 


Programming  Aids  for  Apple  II 

Dakin5  Corporation,  developer  of  The  Controller  business 
system  for  Apple  Computer,  is  releasing  the  Dakin5  Pro¬ 
gramming  Aids ,  a  package  of  seven  programming  aids  for  the 
Apple  II. 

The  first  of  the  programming  aids.  The  Lister,  sends 
BASIC  programs  to  the  printer  where  they  are  listed  using  the 
full  line  capacity  of  the  printer.  The  Peeker  displays  or  prints 
all  or  selected  records  from  a  text  file.  The  Cruncher  removes 
REM  statements  and  compresses  code  in  Applesoft  pro¬ 
grams.  The  Diskette  Copy,  a  diskette-to-diskette  copy,  also 
verifies  that  the  output  matches  the  input  data.  The  other  aids 
are  The  Prompter,  The  Calculator  and  the  Text  File  Copy. 

For  a  demonstration  of  the  Dakin5  Programming  Aids, 
visit  an  Apple  dealer.  Suggested  retail  price  is  $39.95.  Over 
30  pages  of  documentation  are  included  with  the  package. 
For  more  information  contact  Dakin5  Corporation,  7475 
Dakin  St.,  Suite  507,  Denver,  CO;  (303)  426-6090. 

Circle  No.  112 


TRS-80  Automatic  Phone  Dialer/Timer 

Blechman  Enterprises ’s  Telephone  Dialer  Program  for  the 
TRS-80  Level  II,  written  in  BASIC,  will  hold  up  to  500  names 
and  telephone  numbers  in  a  16K  memory  or  about  30  names 
and  numbers  with  a  4K  memory. 

You  may  select  instructions  on  how  to  enter  names  and 
numbers  in  program  DATA  statements.  You  can  then  request 
a  list  of  all  names  in  memory,  which  will  be  displayed  in 
alphabetical  order  on  the  screen,  and  enter  the  desired  name. 
The  computer  displays  the  name,  number  and  area  code,  then 
displays  each  digit  as  it  “dials.”  The  dialing  speed,  fast  or 
slow,  is  accomplished  through  a  simple  external  telephone 
interface  circuit  consisting  of  a  Radio  Shack  $3  relay,  SPDT 
switch,  LED,  resistor  and  9V  battery.  The  relay  contacts  are 
connected  in  series  with  the  telephone  line.  The  system  can 
be  used  with  all  telephone  circuits,  rotary  or  tone. 

No  modification  is  required  to  your  TRS-80.  The  cable 
that  normally  goes  to  the  cassette  remote  jack  is  used  to  pulse 
the  interface  relay.  The  switch  allows  normal  computer  cas- 
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sette  operation,  or  dialing.  The  LED  and  resistor  monitor 
status  and  dialing. 

After  the  program  dials  the  desired  number,  press  Enter 
when  the  party  at  the  other  end  picks  up  the  phone;  the 
computer  displays  the  length  of  the  call  continuously  by  the 
second.  At  the  end  of  the  call  you  can  insert  the  telephone 
rates  for  the  call  and  the  computer  displays  the  total  call  time 
and  charge. 

The  program  is  furnished  on  cassette  with  a  schematic  and 
parts  list.  The  “flip-side”  of  the  cassette  has  the  Phone 
Toll-Charge  Program  which  keeps  continuous  track  of  the 
time  and  charges  of  any  call  without  connection  to  the  phone. 
Price  for  the  program  is  $10  including  shipping.  California 
residents  add  6%.  For  more  information  contact  Blechman 
Enterprises,  7217  Bemadine  Ave.,  Canoga  Park,  CA91307; 
(213)346-7024.  Circle  No.  116 


Software  for  Home  and  School 

Educational  and  home  programs  from  Carta  Associates 
include  VIC  (Visual  Instructional  Computer)  and  the  Carta 
Lesson  Library  series.  VIC  uses  the  TRS-80  display  to  teach 
basic  computer  architecture  plus  assembly  and  machine  lan¬ 
guages  to  the  casual  or  beginning  student.  The  Carta  Lesson 
Library,  a  three-part  package  of  study  and  test  materials,  can 
ask  questions  in  a  variety  of  formats  and,  at  the  instructor’s 
discretion,  in  timed  test  sequences.  The  Lesson  Library’s 
components  are  the  Master  Lesson  Programs,  the  Lesson 
Tapes  and  the  Lesson  Builder,  all  of  which  are  sold  separate¬ 
ly.  The  Lesson  Tapes  provide  study  and  review  data  in  a 
variety  of  subject  areas. 

All  programs  require  a  Level  II  16K  TRS-80.  VIC  costs 
$19.95.  In  the  Lesson  Library,  the  Master  Lesson  Programs 
costs  $29.95  (which  includes  one  Lesson  Tape  of  your 
choice).  The  Lesson  Tapes  costs  $7.95  each.  The  Lesson 
Builder,  which  lets  you  create  your  own  lessons,  costs 
$39.95.  All  are  available  through  computer  stores. 

For  more  information  contact  Carta  Associates,  Inc. ,  Edu¬ 
cation  Products  Division,  640  Lancaster  Ave.,  Frazer  PA 
19355;  (215)  647-9600.  Circle  No.  133 


Disk  Drive  Timer  for  TRS-80  and  Apple  II 

Disco-Tech  has  introduced  DDT,  a  disk  drive  timing  pro¬ 
gram  for  both  the  TRS-80  and  Apple  II.  DDT  lets  you  keep 
track  of  drive  motor  speed  on  a  routine  basis  and  adjust  it  if 
it’s  running  fast  or  slow.  Improper  speed  causes  data  loss  and 
incompatibility  among  diskettes.  DDT  reduces  down  time 
and  costly  repairs,  the  company  said. 

The  program  works  on  any  disk  drive  and  provides  a 
real-time  graphic  display  of  motor  speed  on  the  video  screen, 
which  lets  you  analyze  the  speed  of  each  drive  and  adjust  the 
speed  within  one-tenth  of  one  rpm,  out  of  an  optimum  300 
rpm. 

You  don’t  have  to  be  an  electronics  technician  or  a 
mechanic  to  use  DDT,  the  company  said.  All  you  need  is  two 
screwdrivers,  the  DDT  program  and  five  minutes.  DDT 
comes  with  documentation  which  takes  you  step-by-step 


through  the  analysis  and  adjustment  procedure. 

The  DDT  manual  for  the  TRS-80  contains  specific  in¬ 
structions  for  adjusting  both  new  and  old  model  Radio  Shack 
drives,  Shugart,  MPI,  Pertec  and  Vista.  Apple  drives  are 
treated  in  the  Apple  version  of  the  program. 

DDT  comes  in  two  versions,  for  the  TRS-80  and  for  Apple 
II.  The  TRS-80  DDT  program  may  be  purchased  on  cassette 
at  $14.95  retail  or  on  diskette  at  $19.95.  The  Apple  version 
of  DDT  is  available  on  diskette  only  at  $19.95.  For  more 
information  contact  Disco-Tech,  P.O.  Box  11129,  Santa 
Rosa,  CA  95406;  (707)  523-1600.  Circle  No.  130 


Telecommunications  Facility  for  CP/M 

Lifeboat  Associates  markets  the  Byrom  Software  Tele¬ 
communications  Access  Method  (BSTAM).  This  system  en¬ 
ables  transmission  of  program  or  data  files  between  any  two 
computers  on  whch  BSTAM  is  installed,  and  is  compatible 
with  all  8080/Z-80  systems  using  CP/M  operating  systems  or 
a  derivative,  including  Heath  and  TRS-80  adaptations. 

Transmissions  are  made  over  a  normal  voice  grade  tele¬ 
phone  line  at  300  baud  and  over  direct  wire  interconnections 
at  9600  baud.  Other  than  error  checking  and  protocol  infor¬ 
mation,  no  data  expansion  is  performed,  resulting  in  fast 
transfers.  BSTAM  is  a  commercially  oriented  telecommuni¬ 
cations  facility  with  many  “big  computer”  features  built  into 
it,  such  as  CRC  error  checking  and  group  file  transmission. 

BSTAM  can  precisely  transfer  data  over  poor  circuits,  with 
automatic  retry  provisions  and  perfect  reporting  in  the  event 
of  “hard”  errors.  The  user  interface  provides  for  expansion 
of  file  names,  permitting  a  sequence  of  files  up  to  a  whole 
diskette  to  be  sent,  the  sending  module  automatically  an¬ 
nouncing  the  file  names  to  the  receiving  computer. 

BSTAM  is  supplied  on  diskette  in  all  popular  formats.  The 
license  fee  of  $150  covers  installation  on  the  single  system 
only.  The  documentation  is  available  separately  at  a  price  of 
$5.  For  more  information  contact  Lifeboat  Associates,  2248 
Broadway,  New  York,  NY  10024;  Circle  No.  134 


Software  for  32K  North  Star  System 

Denron  Amusements  has  developed  software  for  the  North 
Star  system  to  include  a  game  series  and  home  applications. 

Games  software  include  Panzer,  Blitzkrieg,  Fall  of  the 
Third  Reich,  D-Day,  Armorcar,  Porkchop  Hill,  Africa 
Corps,  Waterloo,  The  Battle  of  Monmouth,  Starship 
Troopers,  Middle  Earth,  Invasion  of  the  Mud  People  and  The 
Boston  Marathon.  Home  applications  developed  to  date  are 
Magazine  Article  System,  Home  Budget  System,  Buy-Used- 
Car  System  and  Learn  Arithmetic  Program. 

All  programs  were  developed  with  Release  4,  require  one 
drive,  and  utilize  a  32K  system. 

All  games  are  currently  priced  at  $9.95  plus  $1  mailing 
charge.  (NJ  residents  must  add  5%  sales  tax).  The  Learn 
Arithmetic  program  sells  for  $5.95  and  all  other  home  appli¬ 
cation  systems  sell  for  $14.95.  All  prices  incude  the  cost  of 
the  disk.  For  more  information  contact  Denron  Amusements, 
13  MacFarlan  Avenue,  Hawthorne,  NJ  01 506. Circle  No.  131 


Quality  Apple  Software 
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BASIC  TEACHER  -  Learn  Integer  Basic  in  12  easy 
lessons.  TAPE  $17,  DISK  $25 

TEACHER  PLUS  -  Let  your  Apple  Plus  Teach  you. 

Applesoft  II  TAPE  $22,  DISK  $29 
FLOATING  POINT  DICTIONARY  A  teaching  and 
reference  program  for  Applesoft.  DISK  $30 

PERSONAL  ACCOUNTING  SYSTEM  t-  Handy 
Summary  System  TAPE  $22,  DISK  $25 

With  detailed  Reports  &  Audit  Trail.  DISK  $85 

BUSINESS  ACCOUNTING  SYSTEM 

Full  Reports  DISK  $100 
With  Payroll  DISK  $200 
APPLE  TEACHER  -  Universal  Teaching  Program. 

TAPE  $13,  DISK  $22 


Also  Complete  Lines  from  Charles  Mann  & 
Associates,  Personal  ComputerSoft,  Edusoft, 
and  Games  Enterprises.  VISA  &  MASTER- 
CHARGE.  Postage  $2.00 


CRBDIT  CARD  ORDERS 


CREATIVE 

DISCOUNT  SOFTWARE 
256  S.  Robertson,  Suite  2156 
Beverly  Hills,  Calif.  90211 


CIRCLE  30 


DISK  DRIVE  WOES?  PRINTER  INTERACTION? 
MEMORY  LOSS?  ERRATIC  OPERATION? 


DON'T  BLAME  THE  SOFTWARE! 


Power  Line  Spikes,  Surges  &  Hash  could  be  the  culprit! 
Floppies,  printers,  memory  &  processor  often  interact! 

Our  unique  ISOLATORS  eliminate  equipment  interaction 
AND  curb  damaging  Power  Line  Spikes,  Surges  and  Hash. 

ISOLATOR  ( ISO-1  A)  3  filter  isolated  3-prong  sockets; 
integral  Surge/Spike  Suppression;  1875  W  Maximum  load, 

1  KW  load  any  socket  .  $54.95 

"ISOLATOR  (ISO-2)  2  filter  isolated  3-prong  socket  banks; 
(6  sockets  total);  integral  Spike/Surge  Suppression; 

1875  W  Max  load,  1  KW  either  bank .  $54.95 


"SUPER  ISOLATOR  (ISO-3),  similar  to  ISO-1  A 

except  double  filtering  &  Suppression  ....  $79.95 

"ISOLATOR  (ISO-4),  similar  to  ISO-1  A  except 

unit  has  6  individually  filtered  sockets  ....  $93.95 

"ISOLATOR  (ISO-5),  similar  to  ISO-2  except 

unit  has  3  socket  banks,  9  sockets  total  .  .  .  $76.95 

"CIRCUIT  BREAKER,  any  model  (add-CB)  Add  $  6.00 
"CKT  BRK R/SWITCH/PI LOT  any  model 

(  CBS)  .  Add  $11.00 


PHONE  ORDERS  1-617-655-1532 


Electronic  Specialists,  Inc. 


171  South  Main  Street.  Natick.  Mass.  01760 

Dept.  PC 


32K  Structured  Basic  for  Cromemco 

Cromemco  32K  Structured  BASIC,  designed  to  run  in  64K 
Cromemco  systems,  combines  the  advantages  of  a  modular 
language  with  the  ease  of  programming  in  BASIC,  the  com¬ 
pany  said. 

Structured  BASIC  assists  a  programmer  in  building  a  pro¬ 
gram  from  logical  blocks  of  code.  The  high  level  language 
facilitates  program  development,  leads  to  a  more  readable 
code  and  reduces  debugging  and  maintenance  of  programs. 

Structured  BASIC,  an  extension  of  Cromemco  16K  BASIC, 
contains  all  features  of  16K  BASIC  plus  long  variable  names, 
statement  labels,  an  in-line  BASIC  editor,  a  sophisticated 
KSAM,  Procedures,  and  control  structures  including  If-Then- 
Else,  While-Endwhile  and  Repeat-Until. 

Variable  names  may  contain  up  to  31  characters,  facilitat¬ 
ing  program  debugging  and  maintenance. 

Descriptive  statement  labels  may  be  used  in  place  of 
statement  numbers  to  reference  lines  in  a  BASIC  program. 

The  line  oriented  text  editor  enables  the  user  to  delete  or 
insert  selected  characters  in  a  statement  without  retyping  the 
entire  line. 

Incorporated  in  Structured  BASIC  is  KSAM  (Keyed  Se¬ 
quential  Access  Method),  a  disk  storage  and  retrieval  sys¬ 
tem.  KSAM  stores  a  data  file  based  on  the  contents  of  a  record 
rather  than  on  an  arbitrary  record  number.  A  record  can  be 
retrieved  by  specifying  the  contents  of  a  key  field. 

Procedures,  which  allow  for  modular  programming,  are 
called  from  memory  or  a  Procedure  library  and  may  include 
both  global  and  local  variables.  Procedure  names  may  con¬ 
tain  up  to  3 1  characters. 

Cromemco  32K  Structured  BASIC  is  available  for  use  on 
Cromemco  systems  for  $295  on  either  8"  disk  (Model  STB- 
L)  or  5"  disk  (Model  STB-S).  For  more  information  contact 
Cromemco,  Inc.,  280  Bernardo  Avenue,  Mountain  View, 
CA  94043;  (415)  964-7400.  Circle  No.  138 


Business  Mailing  Systems  for  TRS-80 

TBS  Inc.’s  Business  Mailing  System  is  designed  for  large 
scale  business  users  with  a  TRS-80,  at  least  32K  of  memory, 
a  printer  and  two  disk  drives. 

The  system  allows  you  to  store  up  to  150,000  names  on  a 
single  large  file  composed  of  multiple  diskettes.  The  pro¬ 
gram  sorts  entries  into  Zip  code  order  and  alphabetical  order 
within  the  Zip  code.  As  new  entries  are  made,  the  file  is 
expanded  automatically.  In  other  words,  the  file  will  grow 
from  one  diskette  to  two,  all  the  way  up  to  300  diskettes. 
Each  diskette  holds  500  names,  the  company  said. 

The  system  allows  you  to  use  one  through  four  labels  at 
your  discretion.  It  provides  for  the  printing  of  either  three-  or 
four-line  addresses.  The  mail  list  further  allows  you  to  pro¬ 
gram  which  names  you  wish  to  print  out  by  the  use  of  up  to 
ten  exclusive  and  non-exclusive  codes. 

This  system  is  for  the  business  user.  If  less  than  1000 
names  are  to  be  used,  other  systems  would  be  less  expensive 
and  more  versatile,  the  company  said.  For  large  scale  mailing 
lists,  however,  this  system  provides  a  convenient  way  to  do 
large  scale  processing  on  a  small  computer,  the  firm  added. 
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Price  for  The  Business  Mailing  System  is  $125.  For  more 
information  contact  The  Bottom  Shelf,  Inc.,  P.O.  Box 
49104,  Atlanta,  GA  30359;  (404)  939-6031. 

Circle  No.  147 


Mini  Disk  Software  for  Apple 

A  series  of  six  mini  disk  application  programs  is  available 
for  Apple  II  computers  from  Williamsville  Publishing  Com¬ 
pany.  The  application  programs  require  an  Apple  II  or  Apple 
II  Plus  computer  with  32K  RAM  memory,  one  Disk  II  drive, 
and  Applesoft  II  in  ROM  (firmware  card).  All  programs 
come  on  floppy  mini  disks. 

Disk  A1 ,  “Book  Library,”  provides  a  disk-based  catalog 
for  inputting  over  1000  selections  cross-referenced  by 
author,  title  and  subject.  You  can  store  and  search  more  than 
one  subject  per  title.  This  program  can  also  be  used  for 
magazine  articles,  software  library  or  catalog  data. 

Disk  A2,  “Record  Library,”  is  similar  to  “Book  Library” 
but  is  designed  for  music  tapes  and  record  collections.  Data  is 
cross-referenced  by  composer,  title  and  performance.  More 
than  one  performance  can  be  listed  per  title.  As  with  Disk 
A 1 ,  catalog  data  may  also  be  stored. 

Disk  A3,  “Malum  II . .  .Imperial  Roman  Programmable 
Computer  By  Command  of  Caesar,”  is  a  Latin  language 
based  interpreter  similar  to  BASIC.  It  takes  the  Latin  lan¬ 
guage  equivalent  of  BASIC  commands.  All  numeric  input 
and  output  is  via  Roman  numerals.  Two  sample  programs 
and  an  1 1-page  documentation  manual  comes  with  the  disk. 

Disk  A4,  “Graphics  Games,”  has  Bowling,  Checkers, 
The  Derby  and  Tic-Tac-Toe.  The  feature  game  program  is 
The  Derby,  a  horse  race  in  high  resolution  graphics.  Win, 
place  and  show  betting  is  allowed  for  up  to  six  players.  For 
each  race,  seven  horses  are  randomly  selected  from  a  stable 
of  2 1 .  The  track  record  of  each  horse  is  updated  on  the  disk 
file  after  each  race.  The  game  can  last  for  ages  or  you  can 
start  the  record  over  at  any  time.  You  can  name  any  or  all  the 
horses.  The  other  three  games  use  Apple’s  low  resolution 
color  graphics. 

Disk  A5’s  “Checkbook  Program”  can  store  up  to  62 
checks  and  deposits  per  month  (32K  RAM)  or  244  per  month 
(48K  RAM).  The  disk  can  be  used  continuously  for  48 
months  or  indefinately  by  deleting  old  files.  Entries  can  be 
searched  on  payee,  purpose,  user-defined  code,  check  num¬ 
ber,  or  combinations  of  payee  and  purpose,  or  payee  and 
code.  All  entries  found  by  search  are  totalled.  The  program  is 
designed  for  both  home  and  small  business. 

Disk  A6,  “Page  Processor,”  is  a  word  processor.  Origin¬ 
ally  designed  for  the  Centronics  779  and  Apple,  the  program 
is  easily  modified  for  use  with  any  popular  printer  and  can 
also  be  used  as  a  CRT  screen  word  processor  without  a 
printer.  Features  include  editing  capabilities  such  as  line 
centering,  tabbing,  line  insertion  and  deletion.  Each  page  is 
automatically  stored  on  disk  for  future  reference. 

Individual  mini  disks  with  documentation  sell  for  $19.95. 
For  more  information  contact  Williamsville  Publishing 
Company,  Box  250,  Fredonia,  New  York  14063. 
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Master’s  Program 
in  Science 
Communication 

Leading  to  M.S. 

Degree  in  Journalism 

Graduates  of  this  program  qualify  for  positions  as: 

□  reporters,  writers  and  editors  for  computer,  scientific, 
engineering,  technical  or  business  magazines  or 
journals. 

□  science  editors  and  writers  for  newspapers  and  pub¬ 
lishing  houses. 

□  communication  specialists  or  administrators  for  in¬ 
formation  programs  in  science-based  or  research-ori¬ 
ented  agencies. 

□  scientific  liaison  officers  for  technology  assessment 
or  trend  monitoring  in  research  and  development. 

□  public  relations  specialists  and  advisors  for  informa¬ 
tion  campaigns  dealing  with  scientific  subjects. 

□  managers  for  professional  society  seminars,  confer¬ 
ences  and  university  continuing  education  programs  in 
science  and  technology. 

For  further  information  and  applications 
forms,  address  inquiries  to: 

Harold  G.  Buchbinder 

School  of  Public 

Communication 

Boston  University 

640  Commonwealth  Avenue 

Boston,  Massachusetts  02215 

\ _ _ _ J 

ANNOUNCING 

TRS-80 

PEOPLE’S  PASCAL 

“Tiny”  Pascal,  runs  on  any  16K  Level  II  system, 
includes  the  programming  structuring  capabilities 
of  full  Pascal,  but  not  data  structuring. 

Compiled  People’s  Pascal  programs  run  about 
five-times  faster  than  Level  II  Basic  —  graphics 
run  eight-times  faster. 

People’s  Pascal  Tape  3 . $15.50 

(program  development  system,  in  7  programs,  3 
in  Basic.  Requires  T-Bug  and  editor/ assembler) 

People’s  Pascal  Tape  6  . $23.50 

(easier  to  use  —  entire  development  system  loads 
at  once  —  written  in  machine  language) 

Prices  to  CA  residents  $1 6.40 
and  $24.88  (sales  tax). 

Dealer  inquiries  invited. 

Other  People’s  Software  tapes  $8  ($8.45  CA) 

nonprofit 

COMPUTER  INFORMATION 
EXCHANGE 

BOX  158 

L  SAN  LUIS  REY,  CA  92068 
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WANTED: 


BUSINESS 

PROGRAMS 

Personal  Computing  readers  want  your  business 
applications  programs.  Chances  are,  the  soft¬ 
ware  you’ve  developed  to  solve  your  business 
problems  will  also  help  someone  else  faced  with 
a  similar  problem. 

Consider  how  your  business  benefits  from 
your  microcomputer —  not  only  in  the  obvious 
areas  of  inventory,  accounting  and  payroll,  but 
in  all  departments  and  levels  right  up  to  the 
president’s  desk.  Financial  and  marketing  an¬ 
alysis,  time  management,  planning,  materials 
handling,  product  design  and  cost  accounting  are 
areas  ripe  for  creative  programming.  Readers 
want  help  with  all  of  these  problems. 

So  why  not  share  your  solutions  with  our 
readers?  Send  us  an  article  describing  the  prob¬ 
lem  you  faced  and  how  you  used  your  micro¬ 
computer  to  solve  it.  Be  sure  to  include  a  pro¬ 
gram  description,  program  listing  and  sample 
run. 

Remember,  readers  aren’t  familiar  with  your 
program.  So  explain  in  detail  what  the  program 
does  and  how  it  does  it.  Include  here  the  overall 
structure  of  your  program  as  well  as  any  special 
algorithms  or  routines  you’ve  used.  Give  sug¬ 
gestions  for  modifying  or  expanding  the  pro¬ 
gram  for  other  applications,  other  businesses  or 
other  situations. 

All  submissions  should  be  original,  typed  (not 
all  CAPS),  double-spaced  and  neat.  Include 
your  name  and  address  on  the  first  page  of  the 
article  and  enclose  a  self-addressed,  stamped 
envelope  for  return  of  material.  Also,  please  use 
a  fresh  ribbon  on  your  printer  for  program  list¬ 
ings  and  sample  runs. 

Feel  free  to  call  us  at  (617)  232-5470  if  you 
have  any  questions  or  want  to  discuss  specific 
article  ideas. 

Mail  your  manuscript  to: 

Editor 

Personal  Computing 
1050  Commonwealth  Ave. 

Boston,  MA  02215 
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Protection  for  BASIC  Programs 

Data  Associates  has  released  a  program  that  automatically 
protects  BASIC  programs  written  for  the  TRS-80.  UNLIST8 
runs  on  a  single  disk  system  with  32K  memory.  BASIC 
programs  are  protected  against  unauthorized  modification 
and  are  made  confidential.  Hidden  passwords  and  copyright 
notices  selected  by  the  user  are  inserted  and  then  the  program 
is  converted  so  that  it  cannot  be  listed  or  printed.  The  pro¬ 
tected  program  can  still  be  RUN,  CSAVED,  CLOADED,  DISK 
LOADED  and  DISK  SAVED  as  usual. 

Options  permit  unlisting  all  lines,  each  nth  line  or  speci¬ 
fied  blocks  of  line  numbers.  This  program  can  also  be  used  to 
unprotect  or  relist  a  protected  program  provided  you  know 
the  program’s  password.  It  can  relist  each  line,  or  blocks  of 
specified  line  numbers.  Certain  lines  can  be  left  unprotected. 

UNLIST8  converts  any  named  BASIC  program  (saved  in 
ASCII  form  on  disk)  into  the  protected  version  and  auto¬ 
matically  saves  it  on  the  same  disk  under  a  new  name  selected 
by  the  user.  After  the  conversion  is  complete,  a  summary  is 
displayed  of  the  original  name,  the  converted  name  and  the 
elapsed  time,  as  well  as  a  count  of  both  the  input  and  output 
bytes  and  lines.  The  program  displays  prompting  messages 
as  needed. 

An  instruction  manual  and  three  copies  on  cassette  are 
provided.  Cost  is  $19.95  postpaid.  For  more  information 
contact  Data  Associates,  Box  882,  Framingham,  MA01701. 
Circle  No.  146 


Business  Software  for  TRS-80  Model  II 

Micro  Architect  has  converted  its  present  software 
products  to  run  under  the  new  TRS-80  Model  II  computer; 
the  programs  have  been  modified  to  make  use  of  the  ex¬ 
panded  hardware  capabilities  such  as  a  bigger  screen,  more 
memory  and  disk  storage. 

The  company  guarantees  all  Model  II  programs  and  will 
provide  bug  fixes  and  enhancements.  The  president  of  the 
company  writes,  documents  and  supports  all  the  Model  II 
packages. 

A  company  representative  said  several  levels  of  support 
are  provided  to  the  user:  pre-sale  support  includes  manuals 
for  $10  for  examination  which  state  all  the  known  limits  of 
the  package;  after-sale  support  includes  a  free  newsletter  for 
one  year.  The  newsletter  describes  operation  procedures  for 
your  Model  II.  Software  enhancements  and  bug  fixes  will 
also  be  described  in  detail. 

Long-term  support  allows  full  credit  towards  purchase  of 
related,  completely  revised  package,  the  company  stated. 
Software  improvements  will  keep  up  with  hardware  en¬ 
hancements,  such  as  hard  disks  or  intelligent  printers.  For 
those  who  lose  track  of  updates  in  the  newsletter,  revised 
versions  can  be  obtained  on  diskette  for  $15. 

Initial  offerings  include  advanced  mailing  list  system  at 
$99,  a  word  processor  at  $49,  accounts  receivable  at  $149, 
inventory  system  at  $149  and  a  data  base  manager  without 
user  programming  at  $199. 

All  packages  are  integrated  but  can  run  stand-alone.  Prices 
include  8”  diskette,  documentation,  postage  and  newsletter 
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for  one  year.  A  10%  discount  is  allowed  for  orders  of  more 
than  one  package. 

For  more  information  contact  Micro  Architect,  96  Dothan 
St.,  Arlington,  MA 02174. 

Circle  No.  124 


COMPLEMENTS 


Cassette  Accessories  for  Erasing,  Rewinding 

Magnesonics  Sales  offers  two  accessories  for  your  com¬ 
puter  cassette  recorder:  Erase-Sure  and  Rapid  Rewind. 

Erase-Sure,  a  compact,  self-contained  erasing  unit,  uti¬ 
lizes  a  patented  principle  that  consists  of  erasing  pre¬ 
recorded  magnetic  tape  by  passing  it  through  a  rotating 
magnetic  field. 

Rapid  Rewind,  also  a  compact  unit,  will  rewind  a  C-60 
cassette  in  approximately  30  seconds,  according  to  the  com¬ 
pany.  The  firm  said  the  accessory  will  also  stabilize  tape 
tension,  eliminate  tape  binding,  help  control  wow  and 
flutter,  save  wear  on  recording  equipment  and  achieve  uni¬ 
form  tape  packing. 


Both  units  sell  for  $24.50  plus  $1 .50  shipping  and  include 
4  “AA”  batteries.  For  more  information  contact  Magne¬ 
sonics  Manufacturing  and  Sales,  P.O.  Box  758,  Ventura, 
CA  93001;  (805)  642-3092.  Circle  No.  149 


Lowercase  Modification  Kit  for  TRS-80 

Emmanuel  B.  Garcia  Jr.  and  Associates  offers  a  lowercase 
keyboard  modification  kit  for  the  TRS-80. 

The  kit  comes  with  wire,  solder,  control  key,  2102  mem¬ 
ory  chip,  slide  switch,  mounting  hardware  and  docu¬ 
mentation.  Documentation  begins  with  instructions  for 
static-proofing  your  workbench  and  ends  with  an  explanation 
of  how  the  modification  works.  Eight  illustrations  and  dia¬ 
grams  aid  installation. 

The  2102  chip  is  connected  to  a  slide  switch  allowing  the 
TRS-80  to  be  used  with  or  without  lowercase.  To  minimize 
the  chance  of  damage  to  the  chip,  the  wires  harnessing  chip 
and  switch  have  been  pre-assembled,  the  company  said.  The 
control  key  has  gold  plated  contacts  for  long  life. 

The  kit  sells  for  $19.95.  For  more  information  contact 
Emmanuel  B .  Garcia  Jr.  and  Associates,  3950  N.  Lake  Shore 
Dr.,  Rm.  2310,  Chicago,  IL 60613;  (312)  348-6562. 
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Features  of  the  Micropolis  Basic 

Accountant’s  Package  Vs.  1 .0 

Copyright  1979©  Marc  A.  Frederick  Sr. 

Some  of  the  features  of  the  package: 


- . 

Got  an 
unusual 
application? 

If  you  use  your 
computer  for  an  interest¬ 
ing,  intriguing  or  unusu¬ 
al  application  (or  know 
someone  who  does),  our 
readers  would  like  to 
hear  about  it.  Why  not 
write  up  a  short  (500  to 
1000  words),  original 
article  telling  us  about  it? 

Make  it  light  and  newsy, 
and  include  black-and- 
white  photos  if  appropri¬ 
ate.  Send  your  submis¬ 
sion  to  Random  Access, 
Personal  Computing, 

1050  Commonwealth 
Ave.,  Boston,  MA 
02215. 

_ / 


1 .  Written  by  an  accountant. 

2.  Mailing  labels. 

3.  Client  list. 

4.  Chart  of  accounts. 

5.  Trial  balance. 

6.  Journal  listing. 

7.  Identification  of  each  journal  by  name. 

8.  General  ledger. 

9.  Compensation  record. 

10.  Quarterly  941  Federal  Payroll  tax  return. 


11.  Quarterly  DE3  Calif.  State  Payroll  return. 

12.  DE3B  Continuation  sheet  for  Calif.  State 
use. 

13.  Balance  Sheet  (your  format  capabilities). 

14.  Earning  Statement  —  Current  Month  and 
year  to  date  with  percentages. 

15.  Invoice  for  Computer  usage. 

16.  Invoice  for  automatic  billing. 

17.  W-2  Forms. 

18.  Monthly  Billing  Statements. 


The  program  is  fully  documented  and  after  completion  and  proofing  of  journal 
listings,  will  go  to  completion  automatically. 

The  package  consists  of  more  than  22  program  modules  written  in  Micropolis 
Basic  VS  4.0  and  requires  dual  disk  drives  using  Micropolis  MOD  II  quad 
density  diskettes  and  a  minimum  48K  bytes  of  memory. 

All  programs  run  on  8-1/2  by  11  blank  paper  thus  enabling  the  operator  to 
complete  the  account  without  the  time  consuming  problem  of  changing  paper 
stock.  This  includes  quarterly  Calif.  State  and  Federal  payroll  Tax  returns. 
They  come  out  automatically  each  quarter. 

The  system  is  easy  to  operate  and  we  will  sell  the  software  only  or  a  “turn  key” 
operation  —  Call 

Profit  Growth  Creations 

520  North  Brookhurst,  Suite  122 
Anaheim,  California  92801 

(714)  776-0606 


Complete  Systems: 

Hardware  &  Software 
From  $8995.00 


$1995.00 

Manual  $50.00  credit 
to  apply  on  purchase 
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Stay  with 

UowARDjounsonf 
when  you  visit 
California 


SANTA  CLARA  5405  Stevens  Creek  Blvd.  95050.  (408) 
257-8600  •  Centrally  located  in  the  heart  of  Northern  Cali¬ 
fornia's  electronics,  and  information  technology  manufac¬ 
turing  on  Stevens  Creek  Blvd  at  Lawrence  Expressway 
and  1-280  24  hour  Restaurant  service  Rum  Keg  Lounge. 
Strikingly  attractive  California  architecture.  90  rooms  and 
6  studio  rooms.  Fifteen  minutes  from  San  Jose  Airport. 

SAN  JOSE  (AIRPORT)  1755  N.  tSt  St  95112,  (408)  287- 
7535  •  Ninety-six  spacious  rooms  in  country  club  setting 
on  U  S.  101  at  First  St  One  mile  from  San  Jose  Airport  — 
courtesy  car  24  hour  Restaurant,  excellent  meeting  facili¬ 
ties.  auto  rental  in  lobby.  10  minutes  from  San  Jose  State 
and  University  of  Santa  Clara  Marriott's  Great  America  3 
miles  north 

REDWOOD  CITY  485  Veterans  Blvd  94063.  (415)  365-5500 
•  Conveniently  located  1 2  miles  south  of  the  San  Francisco 
Airport  on  U  S.  101  at  Whipple  Avenue  Complimentary 
Airport  transportation  129  deluxe  rooms  and  4  meeting 
rooms.  24  hour  Restaurant  service  with  Rum  Keg  Lounge 
San  Mateo  County  government  offices,  recreational  facili- 
ities  and  tourist  attractions  located  nearby 

3  lodges  conveniently 
located  in  the  heart 
of  the  Electronic/ 
Communications 
Industry 


.  4-IOUJARD  ' 

JownsonJ 


BAY  AREA 

Motor  Lodges 


For  toll-free  reservations  call: 
(800)  654-2000 

J 
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Labels  for  Magnetic  Media 

Pressure-sensitive  labels  specifically 
designed  for  magnetic  media  are  avail¬ 
able  from  the  Consumer  Products  Divi¬ 
sion  of  Dennison. 

The  labels  aid  identifying,  coding, 
filing  and  retrieving  cassettes,  mag¬ 
netic  cards  and  floppy  disks.  They 
come  in  standard  shapes  and  sizes  and 
are  color  coded.  Self-adhesive,  the 
labels  are  removable  to  permit  easy 
replacement.  The  cassette  labels  have 
die-cut  windows  to  show  the  tape 
length  and  keep  the  spools  free 
running.  The  new  labels  fit  right  over 
the  original  identification  area  on  the 
media. 

Cost  per  100  labels  for  cassettes,  5- 
1/4"  diskettes  and  8"  diskettes  is  $1 .95. 
For  more  information  contact  Con¬ 
sumer  Products  Division,  Dennison 
Manufacturing  Company,  300  Howard 
Street,  Framingham,  MA  01701;  (617) 
890-6350.  Circle  No.  120 
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Remote  Control 
through  an  Apple 

Introl/X-10  from  Mountain  Hard¬ 
ware  allows  you  to  remotely  control 
1 10  volt  AC  devices  by  commands  sent 
over  existing  building  wiring.  Utilizing 
an  Apple,  command  signals  are  sent  to 
a  BSR/System  X-10  Command  Con¬ 


sole.  The  console  then  sends  signals 
over  existing  wiring  to  control  electri¬ 
cal  devices. 

The  Introl  Controller  board  plugs 
into  a  peripheral  slot  of  the  Apple.  It 


transmits  control  signals  with  an  ultra¬ 
sonic  transducer  to  the  BSR/X-10 
Command  Console,  which  may  be 
plugged  into  any  convenient  AC  outlet 
near  the  computer.  On  command  from 
the  computer,  the  command  console 
sends  signals  to  remote  modules  lo¬ 
cated  at  the  devices  to  be  controlled.  Up 
to  16  remote  modules  may  be  con¬ 
trolled. 

Introl/X-10  comes  with  software  to 
control  devices  on  predetermined 
schedules.  It  provides  control  of  de¬ 
vices  at  a  given  time,  selection  of  daily 
or  weekly  schedules,  specification  of 
day  of  the  week  or  exact  date  for  a 
particular  event,  specification  of  inter¬ 
vals  of  time  for  an  event  and  device 
wattage  ratings  for  power  consumption 
accounting  for  energy  management. 
Used  with  Mountain  Hardware’s  Apple 
Clock,  the  system  provides  “fore- 
ground”/“background”  capability. 

The  system,  consisting  of  the  Introl 
Controller  board  with  timer  and  ultra¬ 
sonic  transducer,  the  BSR/X-10 
Command  Console  and  three  remote 
modules  is  priced  at  $279.  The  Introl/ 
X-10  Controller  Card  separately  sells 
for  $189.  Additional  remote  modules 
are  available  at  $15.  For  more  infor¬ 
mation,  contact  Mountain  Hardware, 
Inc.,  300  Harvey  West  Blvd.,  Santa 
Cruz,  CA  95060.  Circle  No.  127 


Double  Density  Floppy  Interface 

Tarbell  Electronics  has  released  a 
double  density  floppy  disk  interface,  a 
component  which  enhances  existing 
disk  storage  capacities  with  minimum 
reconfiguration  of  existing  microcom¬ 
puter  systems,  according  to  the 
company. 

The  interface  board  is  supplied  with 
the  new  BASIC  Input/Output  System 
software  for  CP/M  on  single-density 
diskette,  permitting  the  user  to  intermix 
single  and  double  density  diskettes. 
The  Tarbell  system  automatically  de¬ 
termines  whether  single  or  double 
density  is  in  use.  As  many  as  four 
drives  can  be  selected,  using  either 
single  or  double  density. 

Additional  features  provide  a  com¬ 
bination  of  versatility,  speed  and  reli¬ 
ability.  For  instance,  the  8"  Shugart- 
compatible  disk  interface  contains 


WHAT’S  COMING  UP 


phase-lock-loop  and  write  precompen¬ 
sation,  providing  reliable  data  storage 
and  recovery,  the  company  added.  In 
addition,  the  on-board  phantom  boot¬ 
strap  PROM  is  disabled  on  completion 


of  the  bootstrap  operation,  freeing  all 
64K  of  memory  address  space  for  other 
use.  Multi-user  operation  is  now  pos¬ 
sible  due  to  the  direct  memory  access 
for  either  single  or  double-density  oper¬ 
ation.  Extended  addressing  capability 
provides  8  additional  address  bits  as 
specified  by  the  new  IEEE  standard, 
allowing  direct  transfers  to  and  from 
any  location  within  a  16  megabyte 
address  range. 

The  interface  is  shipped  assembled 
and  factory  tested,  with  BIOS  for  CP/M 
on  diskette,  and  a  6-month  warranty  on 
parts  and  labor.  Priced  at  $425,  the 
interface  is  available  for  immediate  de¬ 
livery.  For  more  information,  contact 
Tarbell  Electronics,  950  Dovlen  Place, 
Suite  B.,  Carson,  CA  90746;  (213) 
538-4251.  Circle  Mo.  142 


RAM  Board  for  Heath  H8 

D-G  Electronic  Developments  Co. 
introduced  their  new  random  access 
memory  for  Heath  H8  computers.  The 
RAM  board,  configured  with  32K 
bytes  consumes  less  than  6  watts 
power. 

Fully  assembled,  tested  and  bumed- 
in,  the  DG-32D  is  ready  to  plug  into  the 
H8  and  use  without  additional  wiring. 
The  DG-32D  is  designed  to  operate 
either  with  or  without  the  present  static 
memory  in  the  computer. 

Features  include  full  compatibility 
with  current  Heath  peripherals;  circuit 
protection  to  prevent  damage  to 
memory  output  buffers  if  two  blocks 
are  assigned  to  the  same  address  space; 
memory  addressing  controlled  by  DIP 
switch;  4  independently  addressable 
8K  blocks;  transparent  refresh;  no  wait 


states  required. 

Price  for  the  board  is  $479.  Visa  and 
Master  Charge  are  accepted.  The  DG- 
32D  is  fully  guaranteed  for  one  year. 

For  more  information  contact  Pace¬ 
setters  Graphics,  3223  Forest  Lane, 
Garland,  TX  75042.  Circle  No.  149 


LITERATURE 


Educational  Comic  Book 

A  new,  updated  version  of  Radio 
Shack’s  educational  comic  book,  “The 
Science  Fair  Story  of  Electronics  .  .  . 
the  Discovery  That  Changed  the 
World!”,  is  now  available  for  free 
distribution  to  schools,  clubs,  youth 
groups  and  interested  individuals. 

The  booklet,  designed  as  a  motiva¬ 
tional  learning  aid  for  young  people, 
focuses  on  the  human  interest  side  of 
science  with  important  discoveries  and 
the  people  who  made  them  described  in 
easy-to-read  narrative. 

Topics  include  magnetism,  ancient 
use  of  batteries,  electricity  in  nature, 
the  development  of  “wireless”  com¬ 
munications,  TV,  radar  and  the  transis¬ 
tor,  electronics  in  aviation  and  space 
exploration,  and  the  computer  age. 

The  booklet  is  available  from  partici¬ 
pating  Radio  Shack  stores  and  dealers. 

For  more  information  contact  Radio 
Shack,  1300  One  Tandy  Center,  Fort 
Worth,  TX  76102.  Circle  No.  135 


Student  Workbooks  for  Pet 

Cow  Bay  Computing  has  published 
two  student  workbooks  for  beginning 
programming  classes  using  the  8K  Pet. 

Both  the  beginner  and  intermediate 
workbooks  have  been  designed  for 
schools  which  are  inserting  a  computer 
literacy  unit  into  regular  math  or 
science  classes,  the  company  said. 
Non-computer  oriented  teachers,  as 
well  as  those  with  prior  skills,  can  use 
the  workbooks  as  complete  lesson 
plans  with  assignments  included,  the 
company  added. 

Teaching  units  in  the  volumes  fea¬ 
ture  step-by-step  instruction,  daily 
lesson  plans,  classwork  and  homework 
worksheets,  quizzes,  hands-on  and 


By  Netronics 


ASCII/BAUDOT, 
STAND  ALONE 


Computer  H-rI95 
Terminal  1W 


The  Netronics  ASCII/BAUDOT  Computer  Terminal  Kit  is  a 
microprocessor-controlled,  stand  alone  keyboard/terminal 
requring  no  computer  memory  or  software.  It  allows  the  use  of 
either  a  64.  or  32  character  by  16  line  professional  display  for¬ 
mat  with  selectable  baud  rate,  RS232-C  or  20  ma.  output,  full 
cursor  control  and  75  ohm  composite  video  output. 

The  keyboard  follows  the  standard  typewriter  configuration 
and  generates  the  entire  128  character  ASCII  upper/lower  case 
set  with  96  printable  characters.  Features  include  onboard 
regulators,  selectable  parity,  shift  lock  key,  alpha  lock  jumper, 
a  drive  capability  of  one  TTY  load,  and  the  ability  to  mate 
directly  with  almost  any  computer,  including  the  new  Ex¬ 
plorer/85  and  ELF  products  by  Netronics. 

The  Computer  Terminal  requires  no  I/O  mapping  and 
includes  lk  of  memory,  character  generator,  2  key  rollover, 
processor  controlled  cursor  control,  parallel  ASCII/BAUDOT 
to  serial  conversion  and  serial  to  video  processing— fully 
crystal  controlled  for  superb  accuracy.  PC  boards  are  the 
highest  quality  glass  epoxy  for  the  ultimate  in  reliability  and 
long  life. 

VIDEO  DISPLAY  SPECIFICATIONS 

The  heart  of  the  Netronics  Computer  Terminal  is  the  micro- 
processor-controlled  Netronics  Video  Display  Board  (VID) 
which  allows  the  terminal  to  utilize  either  a  parallel  ASCII  or 
BAUDOT  signal  source.  The  VID  converts  the  parallel  data  to 
serial  data  which  is  then  formatted  to  either  RS232-C  or  20  ma. 
current  loop  output,  which  can  be  connected  to  the  serial  I/O 
on  your  computer  or  other  interface,  i.e.,  Modem. 

When  connected  to  a  computer,  the  computer  must  echo  the 
character  received.  This  data  is  received  by  the  VID  which 
processes  the  information,  converting  to  data  to  video  suitable 
to  be  displayed  on  a  TV  set  “(using  an  RF  modulator)  or  on  a 
video  monitor.  The  VID  generates  the  cursor,  horizontal  and 
vertical  sync  pulses  and  performs  the  housekeeping  relative  to 
which  character  and  where  it  is  to  be  displayed  on  the  screen. 
Video  Output:  1.5  P/Pinto  75  ohm  (EIA  RS-170)  •  Baud  Rate: 
1 10  and  300  ASCII  •  Outputs:  RS232-C  or  20  ma.  current  loop 
•  ASCII  Character  Set:  128  printable  characters—  _ 


«BT5€0vxyv«W*floi«oai^II^ 
!‘mi,()*+,-./0123456789:  ;<=>? 
«*COEFGHIJ>aJt^^ 

'  abedef  9ki  jklaftopvstuwxyrC'.HI 


BAUDOT  Character  Set:  ABCDEFGH1JKLMNOPQ 
R  S  T  U  V  W  X  Y  Z  -  ? :  *  3  $  H  (  J  .  ,  9  01  4  15  7  2  /  6  8* 
Cursor  Modes:  Home,  Backspace,  Horizontal  Tab,  Line  Feed, 
Vertical  Tab,  Carriage  Return.  Two  special  cursor  sequences 
are  provided  for  absolute  and  relative  X-  Y  cursor  addressing  • 
Cursor  Control:  Erase,  End  of  Line,  Erase  of  Screen,  Form 
Feed,  Delete  •  Monitor  Operation:  50  or  60Hz  (jumper 
selectable. 

Continental  U.S.A.  Credit  Card  Buyers  Outside  Connecticut 

CALL  TOLL  FREE  800-243-7428 


To  Order  From  Connecticut  Or  For  Technical  mam  _ 
r1  Assistance,  Etc.  Call  (203)  354-9375  ■ 

I  Netronics  R&D  Ltd.,  Dept.  PC  1  I 

333  Litchfield  Road,  New  Milford,  CT  06776 
|  Please  send  the  items  checked  below — 

ID  Netronics  Stand  Alone  ASCII  Keyboard/Computer  ■ 
Terminal  Kit,  $149.95  plus  $3.00  postage  &  handling.  | 

ID  Deluxe  Steel  Cabinet  for  Netronics  Keyboard/Termi-  . 
nal  In  Blue/Black  Finish,  $19.95  plus  $2.50  postage  | 

I  and  handling. 

D  Video  Display  Board  Kit  alone  (less  keyboard),  $89.95  | 

I  plus  $3  postage  &  handling. 

D  12”  Video  Monitor  (10  MHz  bandwidth)  fully  assem-  I 

I  bled  and  tested,  $139.95  plus  $5  postage  and  handling.  _ 
D  RF  Modulator  Kit  (to  use  your  TV  set  for  a  monitor),  | 

I  $8.95  postpaid. 

D  5  amp  Power  Supply  Kit  In  Deluxe  Steel  Cabinet  I 
■  (±  8VDC  @  5  amps,  plus  6-8  VAC),  $39.95  plus  $2  " 

postage  &  handling. 

I  Total  Enclosed  (Conn.  res.  add  sales  tax)  $_ 

By- 

ID  Personal  Check  D  Cashiers  Check/Money  Order  ! 

D  Visa  □  Master  Charge  (Bank  # _ )  | 

|  Acct.  # 


_  Signature. 

I  Print 
■  Name _ 


_Exp.  Date  _ 


City_ 

State. 


_  I 

imm  □  Send  Me  More  Information  mm*  mm  J 
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CLASSIFIEDS 


Badw  /had! 

COMPUTER  CENTER 

MICRO  MANAGEMENT 

SVSTEMS 


Up  To  15%  Discount 
on 

TRS-80's 


WE  HAVE  THE  HIGHLY 
RELIABLE  LOBO  DISK  DRIVE 
INSTOCK! 


MINI  MALL— DOWNTOWN  SHOPPING  CENTER 
CAIRO,  GEORGIA 31728 
912-377-7120 


TRS-80  Quality  Software 


32K  Mod  I 

64K  Mod  II 

Data  base  manager 

$69 

$199 

Mailing  list  system 

$59 

$99 

Inventory  system 

$99 

$149 

Accounts  receivable 

$69 

$149 

Word  processor 

$49 

$49 

Manual  only 

$5 

$10 

Prices  include  disk,  documentations,  postage. 
Tony  W.  Pow 
96  Dothan  St. 

Arlington,  MA  02174 


Jhe. 
Best  of 

Personal 

Computing 

See  page  21. 


Moving? 

1 .  For  FASTEST  service  attach  old 
mailing  label  in  space  below. 
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3.  Mail  to:  Circulation  Manager 
Personal  Computing 
1050  Commonwealth  Ave. 
Boston,  MA  02215 


Iniin 


Turn  your  daydreams  and  visions  of 
the  future  into  cash.  We’re  looking  for 
short  (500  to  2000  words)  science  fiction 
stories  dealing  with  the  future  of  micro¬ 
computers  —  their  possible  uses  and  their 
roles  in  society  and  in  people’s  lives. 
Stories  must  be  original  and  not  published 
elsewhere.  Submit  your  typed,  double¬ 
spaced  story  to  Personal  Computing,  1050 
Commonwealth  Ave.,  Boston,  MA  02215. 


Looking  to  buy 
or  sell 

your  software?  Try 
Personal 
Computing 
Classifieds. 

Rates:  Per  col.  inch 

Up  to  29  column  inches . $40.00 

30-59  column  inches  . $36.00 

60-99  column  inches  . $33.00 

100-299  column  inches  . $30.00 

300-599  column  inches  . $27.00 

More  than  599  column  inches  . $24.00 

Call 

Personal 

Computing 

(617)  232-5470 

save  more  than  20% 

NORTH  STAR  —  INTERTUBE 
THINKER  TOYS — MICROTEK 

The  smartest  computers  at  the  smartest  unce 

QUAD  &  DOUBLE  DENSITY 

LIST  ONLY 

HORIZON-  1-32K-D  kit  $1999  $1585 

HORIZON-2-32K-D  kit  2399  1905 

Assembled  &  tested  2765  2195 

HORIZON-2-32K  kit  QUAD  2799  2225 

Assembled  &  tested  3215  2555 

PASCAL  for  NORTH  STAR  on  Disk  49 

Powerful  NORTH  STAR  BASIC  FREE 

THINKER  TOYS  DISCUS/  2D  A&T  1 149  949 

INTERTUBE  II  SMART  TERMINAL  995  745 

MARYELLEN  WORD  PROCESSOR 

Your  Best  Buy  38 

MICROTEK  PRINTER  750  675 

PDS  $99  Anadex  Printer  995  875 

COMPILER  for  HORIZON  Secret  Superfast  Code  100 
VERBATIM  for  the  best  Box  of 

DISKETTES  10  29 

Which  Computers  are  best?  BROCHURE.  .  FREE 

AMERICAN  SQUARE  COMPUTERS 
KIVETT  DR  *  JAMESTOWN  NC  27282 
■  —  (919)  883-1105  ■ 


WHAT’S  COMING  IIP 


hands-off  exercises  and  group  and 
individual  assignments. 

Prices  for  the  volumes  are  :  “Feed 
Me,  I’m  Your  Pet”  (Beginner-1), 
$4.95;  “Looking  Good  with  your  Pet” 
(Intermediate- 1),  $4.95;  and  “Tea¬ 
cher’s  Pet’’  (Lesson  plans,  quizzes  and 
answer  key),  $4.  “Teacher’s  Pet’’  is 
free  with  orders  of  25  or  more  work¬ 
books.  Quantity  discounts  are  avail¬ 
able.  For  more  information  contact 
Cow  Bay  Computing,  Box  515,  Man- 
hassett,  NY  11030.  Circle  No.  137 


Electronics  Catalog 

A  104-page  catalog  of  electronic  kits 
is  now  available  free  from  Heath  Com¬ 
pany.  New  products  featured  include  a 
series  of  self-instruction  math  pro¬ 
grams  and  an  educational  program  en¬ 
titled  “Computer  Concepts  for  Small 
Business” 

Product  categories  include  personal 
computer  systems,  amateur  radio, 
color  television,  stereo  components, 
test  instruments,  digital  clocks,  auto, 
marine  and  aircraft  accessories,  plus  a 
new  selection  of  self-instruction  pro¬ 
grams  in  electronics-related  subjects. 

For  more  information  contact  Heath 
Company,  Dept.  350-930,  Benton 
Harbor,  MI  49022.  Circle  No.  144 


1980  Radio  Shack  Catalog 

Radio  Shack’s  176-page  1980 
catalog  is  now  available  free  from  more 
than  6000  participating  stores  and 
dealers  nationwide.  The  catalog  fea¬ 
tures  computers  and  stereo  compo¬ 
nents,  toys,  parts  and  accessories  for 
home  entertainment,  hobbyists  and 
experimenters. 

The  catalog  includes  the  TRS-80 
system,  the  new  Model  II  business 
microcomputer  and  the  complete  line 
of  Realistic  stereo  components,  CB 
equipment,  radios,  tape  recorders. 
Archer  antennas,  Micronta  test  in¬ 
struments  and  ArcherKit  and  Science 
Fair  hobby  kits. 

For  more  information  contact  Radio 
Shack,  1300  One  Tandy  Center,  Fort 
Worth,  TX  76102;  (817)  390-3272. 
Circle  No.  148 


DO  YOU  OWN 
A  PERSONAL  COMPUTER? 

a  PET?  an  APPLE  II?  a  VIP? 
a  Studio  II?  a  Sorcerer? 

If  so.  then  you  need  the  ARESCO  newsletter  specifically 
dedicated  to  YOUR  personal  computer  system.  One  of  the 
ARESCO  newsletters  is  tailored  to  meet  your  computer's  con¬ 
figuration  -  for  $15.00  you  can  lind  out  what  s  new  with  the  rest  of 
the  folks  who  purchased  machines  just  like  yours.  Your  $15.00 
buys  all  ten  issues  of  the  current  volume  of  one  newsletter  -  you 
won't  miss  a  single  issue! 

Just  tell  us  which  computer  you  own  or  which  newsletter  you 
need: 

•The  PAPER -for  the  Commodore  PET" 

•The  RAINBOW -for  the  APPLE  II" 

•The  SOURCE -for  the  Exidy  SORCERER" 

•The  VIPER -for  the  RCA  VIP" 

•The  MtCROSTUDtO  NEWS  -  for  the 

RCA  Studio  II" 

Send  an  SASE  for  further  Information  or  send  H5  (cash,  check.  MC/ViSA) 
and  get  your  subscription  started  at  once  Non. USA  subscnDera  add  SiO.OO 

for  airmail  postage  MicrOStUdiO  N0WS  (10.00) 

AP1FBM  BOX  1142 

ARESCO  Columbia  MD  21044 

301-730-5186 


TRS-80  Ownersl  We  want  to  be  your 
ALTERNATE  SOURCE 
for  Software  and  Information! 

Available  NOW: 

CD-This  Z-80  program  allows  you  to 
access  and  copy  ANY  diskette  file-even 
from  formatted-only  diskettes!  A  must 
for  single  drive  owners;  a  valuable  tool 
for  all  disk  users.  With  diskette  $15.95. 
ISAR-Information  Storage  and  Retrieval. 
A  very  fast  and  usable  Data  Base  system 
which  uses  Random  files  that  you  create 
using  easy  prompts.  Excellent  routine 
for  sorting!  Best  available  at  even  near 
the  price.  With  source/diskette  $16.95. 
THE  ALTERNATE  SOURCE  NEWS-A 
publication  containing  lots  of  good  info 
and  offers  to  help  interface  YOU  with 
your  TRS-80.  6  issues-$9.00.  Sample 

copy-$2.00 

Check  our  bingo  number  for  more  juicy 
offers  or  order  the  above  directly  from: 

THE  ALTERNATE  SOURCE 
1806  Ada  Lansing,  Ml  48910 

We  ship  FAST!  BAC/MC  517  487-3358 
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APPLE  PRODUCTS 


Apple  II 16K  Computer . $995.00 

Apple  II 16K  Plus  .  995.00 

Apple  Disk  w/Controller .  550.00 

Apple  Disk  w/o  Controller . 475.00 

Apple  Soft  Card . 180.00 

Pascal  Language  SYS . 495.00 

High  Quality  16K  RAM  Set  .  99.00 

BPI  General  Ledger  SYS .  300.00 

Plan  Modeling  System .  95.00 

MNTN.HDWR.  Clock  Board .  175.00 

Trendcom  100  Printer  .  375.00 

Trendcom  200  Printer  . 595.00 

Centronics  779  Printer 

w/lnt.  Card .  1395.00 

OHIO  SCIENTIFIC 

Cl-P  Personal  Computer . $329.00 

Morse  Code  Transieve  Program 
for  Challenger  Cl-P  Computer 
Send  &  Recieve  CW . . 14.95 


OLENSKY  BROS.,  INC. 

COMPUTER  SALES  DIVISION 
3763  Airport  Blvd.  •  Mobile,  AL  36608 
(205)  344-7448 

WE  PAY  SHIPPING 

Master  Charge  and  VISA  accepted 


OSI  SOFTWARE  OSI 

FOR 

OHIO  SCIENTIFIC 

50  PROGRAMS 

ALL  ORIGINAL  ALLIN  BASIC  ALL  RUN  IN  4K 
ALL  ON  TAPE  AND  DISK  ALL  WELL  DOCUMENTED 
AVAILABLE  FOR  Cl,  C2,  AND  SUPERBOARD 

Our  $1.00  catalog  Includaa  a  fraa  gama  Hating,  pro¬ 
gramming  hints,  POKE  locatlona,  and  othar  atutt  OSI 
forgot  to  mantlon. 

*  *  *  SPECIALS  *  *  * 

CHESS  FOR  OSI  $19.95 

(not  in  BASIC-specify  system) 

TEN  TANK  BLITZ  $9.95 

Super  tank  game  with  ten  tanks  in  real  time  action  — 
complex  strategy  —  a  new  concept  In  computer 
games. 

LINE  RENUMBERER  $4.95 

Renumbers  lines  gnd  GOSUBs,  GOTOs  &  IFTHENs 
Cl-P  (SUPERBOARD)  CURSOR  CONTROL 
PROGRAM  $9.95 

Adds  real  backspace,  instant  screen  clear,  and  line 
editing  to  Cl. 

AARDVARK 

TECHNICAL 

SERVICES 

1690  BOLTON,  WALLED  LAKE 
Ml  48088  313-624-6316 
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"Highest  rated  games  are  the  Adventure  games". 


Robert  Purser  Edition  7  CCR 
Declared  a  true  "Classic". 

Computer  Cassettes  Review,  Fall  79 
"Adams'  Adventure  is  exquisite.  It  is  a  true 
tour-de-force  .  .  ." 

Recreational  Computing  Sep/Oct  79 

Out  of  50  programs  reviewed  Adventure  was 
rated  No.  1!  "Highly  Recommended". 

80  Software  Critique  Issue  No.  1 
"I  highly  recommend  these  programs". 

80- US  Journal,  Sept /Oct  79 
Adventures  by  Scott  Adams  are  available  from 
our  many  fine  Dealers  for  TRS-80,  Pet,  Sorcerer 
and  by  Christmas,  the  Apple  II! 

Write  for  free  flyer  —  Each  Adventure  $14.95 
Adventure  International 
Box  3435 

Longwood,  Florida  32750 
COD/Visa/Mastercharge  -  Call  (305)  862-6917 
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Turn  to  page  21 
for  details  on 


how  you  can 
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MICRO- ADS 


Personal 

Comp«lin« 


— - ■> 

If  you’re  missing  any  of  these 
you  have  gaps  in  your  data  bank. 

Update  your  files  with  Personal  Computing  back  issues.  Past  issues  contain 
articles  on  computer  basics  and  getting  acquainted  with  your  personal  system, 
programs  for  business  and  home  use,  educational  applications,  programming 
tips  and  suggestions  on  getting  the  most  from  your  computer  —  plus  much, 
much  more. 

Just  send  $3  for  each  issue*  of  Personal  Computing. 

Use  the  coupon  below  to  place  your  order  while  our 
limited  supply  lasts. 

*  Canada  and  Mexico,  $4;  all  other  foreign,  $6. 


□  Send  me  these  back  issues 
of  Personal  Computing  for  $3  each: 

□  January/February  1977  □  October  1978 

□  July/August  1977  □  November  1978 

□  September/October  1977  □  June  1979 

□  November/December  1977  □  July  1979 

□  January  1978  □  October  1979 

□  April  1978  □  November  1979 

□  May  1978  □  December  1979 

□  June  1978 

Issues  not  listed  are  out  of  print 


□  My  check  is  enclosed. 

□  Charge  to  my  □  Master  Charge 

□  Account  No _ 


□  Visa 


Card  Expiration  Date . 


Name 


Address 
City _ 


State . 


ZIP. 


Mail  to:  Personal  Computing 

1050  Commonwealth  Ave. 
Boston,  MA  02215 
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Improve  your  chess  with  the 
right  book  for  your  level  of  skill 

PLUS  A  FREE  COPY  OF  “THE  OFFICIAL  RULES  OF  CHESS 

Learn  from  the  masters.  The  David  McKay  Company,  the  leading 
publisher  of  chess  books,  has  carefully  selected  the  classic  chess 
books  for  all  levels  of  play  as  a  special  offer. 

Each  book  is  written  by  a  chess  master  in  an  easy-to-understand 
style  so  that  you  can  quickly  improve  your  own  game.  And  with 
your  selection  you’ll  receive  “The  Official  Rules  of  Chess”—a  $2.95 
value— as  a  free  gift.  Order  the  books  you  need  now  and  add  years 
of  greater  enjoyment  to  your  chess  game. 

The  Official  Rules  of  Chess.  The  only  book  of  chess  rules  officially  sanctioned  by 
the  World  Chess  Federation  and  the  United  States  Chess  Federation.  It  is  yours 
to  keep  as  a  free  gilt  just  for  examining  any  of  the  books  offered  here.  A  $2.95  value— Free. 


FOR  BEGINNERS 


Chess  Fundamentals  by  J.R  Capablanca  and  My  Sys¬ 
tem  by  Aron  Nimzovich.  The  two  most  valuable 
books  for  anyone  interested  in  chess.  Chess  Fun¬ 
damentals  is  the  classic  manual  that  has  simpli¬ 
fied  learning  chess  for  thousands  through  its 
diagrams  and  explanations  of  18  complete 
games.  My  System  reveals  the  theories  of  po¬ 
sitional  chess  essential  to  every  player  who 
wants  to  improve  his  or  her  game.  A  two- 
book  set  (paperbound)  Only  $8.90 
Guide  to  the  Chess  Openings  by  Leonard  Barden  and  Tim 
Harding.  A  basic,  easy-to-use  survey  of  the  concepts  behind 
the  openings.  Designed  to  help  the  developing  player  find  his 
own  way  to  stronger  play.  Only  $8.95 


FOR  ADVANCED  PLAYERS 


MODERN 

CHESS 

OPENINGS 


StnujUie 

Practice 

LilUill 


Modern  Chess  Openings 

by  Walter  Korn.  Elev¬ 
enth  Edition.  This  clas¬ 
sic  work  is  known  as 
“The  Chess  Player’s  Bi¬ 
ble.”  it  is  designed  to 
give  you  a  comprehen¬ 
sive  view  of  the  historic 
range  and  the  structure 
of  the  openings,  the  es¬ 
sence  of  opening  stra¬ 
tegy.  a  summary  of  the 
important  variations, 
and  ail  the  latest  devel¬ 
opments  in  the  game.  A 
“must”  for  any  serious 
player.  Only  $12.50 


The  Modern  Chess  Sacri¬ 
fice  by  Leonid  Sham- 
kovich.  The  first  book 
to  give  you  a  detailed 
classification  of  sacri¬ 
fices  in  the  opening  and 
middle  games,  with  ex¬ 
amples  from  contem¬ 
porary  Master  play. 
Plus  the  first  modern 
treatise  on  the  theory  of 
sacrifice.  A  valuable 
addition  to  your  chess 
library  Only  $9.95 


The  Chess  Struggle  In 
Practice  by  David  Bron- 
stein.  The  classic  anal¬ 
ysis  of  the  historic 
Zurich  Candidates 
Tournament  which  de¬ 
monstrated  some  of  the 
strongest  and  most  in¬ 
novative  middle-game 
play  in  modern  times  A 
fascinating  study,  com¬ 
plete  with  350  game 
diagrams.  Only  $17.95 


The  World’s  Great  Chess 
Games  by  Reuben  Fine. 
A  new,  revised  and  ex¬ 
panded  edition.  A  com¬ 
prehensive  coverage  of 
the  game  from  its  his¬ 
torical  origins  to  the 
beginnings  of  modern 
chess  and  to  some  of 
today's  greatest  play¬ 
ers.  An  exceptional  op¬ 
portunity  to  learn  from 
the  greatest  players  in 
history.  Only  $14.95 


Your  Satisfaction  Guaranteed  Or  Your  Money  Back 


THE  DAVID  McKAY  CO.  INC.  750  Third  Avenue.  New  York.  N  Y  10017  Dept  #741 


YES.  I  wish  to  improve  my  chess  game  by 
learning  from  the  Masters.  Please  send  me 
the  book(s)  I  have  indicated  below.  If  I  am 
not  completely  satisfied.  I  can  return  it 
(them)  within  30  days  for  a  full  refund  or 
credit.  I  understand  that  with  my  order  I 
will  also  receive  a  free  copy  of  The  Official 
Rules  of  Chess  a  $2.95  value,  which  is  mine 
to  keep  just  for  examining  the  book(s)  I 
have  selected. 

□  Chess  Fundamentals  and  My  System. 
atwo-bookset@S8.90 

□  Guide  to  the  Chess  Openings  @  $8.95 

□  Modern  Chess  Openings  @$12.50 

□  The  Modern  Chess  Sacrifice  @  $9.95 

□  The  Chess  Struggle  in  Practice  @S17  95 

□  The  World's  Great  Chess  Games  @$14.95 
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STEP  UPTO  AC4P 
FROM  OHIO  SCIENTIFIC 

You  know  about  computers.  In  fact, 
you  probably  own  one  now.  One  that 
you  might  be  thinking  of  expanding.  We 
have  a  better  idea. Take  a  giant  step 
into  the  personal  computing  future  with 
an  amazing,  new  C4P  from  Ohio 
Scientific. 


SOUND 

1 — programmable  tone  generator 
200  —  20KHz 

1 —  8  bit  companding  digital  to  analog 
converter  for  music  and  voice 
output. 

HUMAN  INPUT  EXPANSION 

2 —  8  axis  joystick  interfaces 
2—10  key  pad  interfaces 


■  ■ 


C4P$698 


8K  BASIC-in-ROM,  8K  of  static  RAM 
and  audio  cassette  interface.  Can  be 
directly  expanded  to  32K  static  RAM 
and  two  mini-floppy  disks. 


C4P  MF$1695 


SPEED  SEPARATES  THE 
COMPUTERS  FROM  THE  TOYS 

The  C4 P  MF  has  execution  speed  that 
is  twice  as  fast  as  Apple  II  or 
Commodore  PET  and  over  THREE 
times  as  fast  as  TRS-80.  They  are 
many  times  faster  than  the  recently 
introduced  flock  of  video  game  type 
computers.  And,  as  if  that  weren’t  fast 
enough,  the  C4P  nearly  doubles  its 
speed  when  equipped  with  the  GT 
option. 


HOME  INTERFACE 

1— AC-12  AC  remote  control  interface 

DISPLAY 

32  x  64  with  upper  and  lower  case 
2048  Characters. 

256  x  512  effective  Graphic  Points 
16  Colors 

SOFTWARE 

Ohio  Scientific  offers  a  comprehensive 
library  of  both  systems  and 
applications  software  for  the  C4P. 


All  the  features  of  the  C4P  plus  real 
time  clock,  home  security  system 
interface,  modem  interface,  printer 
interface,  16  parallel  lines  and  an 
accessory  BUS.  The  C4P  MF  starts 
with  24K  RAM  and  a  single  mini-floppy 
and  can  be  directly  expanded  to  48K 
and  two  mini-floppies.  Over  45  diskettes 
now  available  including  games, 
personal,  business,  educational  and 
home  control  applications  programs  as 
well  as  a  real  time  operating  system, 
word  processor  and  a  data  base 
management  system. 

Computers  come  with  keyboards  and  floppies  where  specified. 
Other  equipment  shown  is  optional. 


The  C4P  is  an  outstanding  premium 
computer  —  years  ahead  of  the 
market.  We  know  because  there’s 
nothing  quite  like  it  for  the  price, 
anywhere.  And  probably  won’t  be  for  a 
very  long  time. 


For  literature  and  the  name  of  your  local 
dealer,  CALL  1-800-321-6850  TOLL  FREE. 


1333  SOUTH  CHILLICOTHE  ROAD 
AURORA,  OH  44202  •[216]  562-31 01 


